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SPECIAL MOTE 


The information in all three volumes of this document has been 
carei'uLly checked. It is current at the time of publication, 
the end of August, 1977. This document will not be revised 
to show corrections and further changes. Rather, a new 
document will be Issued toward the end of 1977 incorporating 
all changes, and making necessary corrections. The new volumes 
will be issued under the title: "As-Built Design Specifications 

for the CAMS Image-100 Hybrid System, as modified. The new 
document will be issued as LEC-11216 and JSC-13118. 

Please bring errors and corrections to the attention of L. Giddings, 
333,6311, mail code C42. 


ABSTRACT 


This document shows the CAMS Image*-100 Hybrid System as it was 
actually built. Volume 1 lists the computer programs for each 
portion of the system, together with functional flow charts. 
Subroutines and function for each program are described in the 
summary* Volume 2 presents detailed flow charts and listings 
of all items listed in the first volume. The third volume pre- 
sents brief descriptions and listings of subroutines shared by 
several programs. All three volumes close with an index of 
computer elements of the entire document. 
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1. SCOPE 


This document contains the design speoifioation for software for 
the CAMS Image-100 Hybrid System. For economy, portions of 
existing Image-100 programs and interface modules were used 
whenever possible. 

The CAMS Image-100 Hybrid System is Implemented on the Building 
17 POP 11/45 Image processor to support CAMS Procedure 1 evaluation. 

This document does not address software implemented on the LACIE 
system, except in reference to Interfaces between the two systems. 
Further, this document assumes that the reader is familiar with 
both "Procedure 1" and the Image-100 analysis system. 
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2. APPLICABLE DOCUMENTS 


• Job Order 63-1347-1195 

• Requirements Document RECP 7N0001, dated January 5^ 1977 
e TIRF 76-0106 

e GSFC/JSC INterface Control Document for the Large Area Crop 
Inventory Experiment. LACIE Level III Baseline Document 00701 « 
December 29, 1974. 

e JSC IMAGE-100 USERS' MANUAL, JSC-12586, LEC-10263, J\me 1977 

e TEST SPECIFICATIONS for the CAMS Image-100 Hybrid System, 
LEC-10631, June 1977. 



3. SYSTEM DESCRIPTION 


This document describes the CAMS Image-100 Hybrid System. It 
presents design specifications for the software and the data base 
implemented on the PDP 11/45 and associated hardware in the Data 
Techniques Laboratory « Bldg. 17/ JSC. 

The system Is designed to take advantage of unique I-lOO display 
capabilities for Interactive processing and the high speed of 
clustering and classification processes on the batch LACIE 6 
system. The following paragraphs and Figure 3.1 briefly describe 
the procedures an analyst might follow using this system and the 
flow of data between the Image-100 and LACIE 6 systems. Current 
detailed LACIE analyst procedures are provided in the document. 

Landsat imagery comes to JSC after certain preprocessing functions 
have been performed by the Goddard Space Plight Center. The data 
on tape is used to prepare film products, as well as to update 
the LACIE data bases, as shovm in Figure 3-1. 

Acquisitions for certain segments are transmitted by tape to the 
Image-100 data base. Once a decision has been made to process 
the accumulated data for a segment with the new acquisition, an 
analyst will normally first delineate DO/DU fields either cn the 
Del Foster devices, using a photographic image; or at the Image- 
100 console, using the cursor and image on the television screen. 

The analyst must label dots before performing clustering and 
classification on the LACIE 6 system. He may label dots either 
interactively or offline, but probably the most convenient will 
involve the Image-100 console. Hv can display the dots on the 
screen, superimposed on the image. He may then type is labels 
for each one that he can identify, using the Tektronix console. 
When completed, the Image-100 system will (indirectly) generate 
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Figure CAMS Hybrid Functional Data Flow. 
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Figure 3-1.- Continued 









a card deck containing all labels to be used on the LkCIE 6 
syst^. The analyst might prepare the same cards manually if 
he wished, using photographic images and a transparent dot 
overlay. 

This deck of cards, with a few others added, is submitted as a 
batch job to the LACIE 6 system. It contains all needed instruc- 
tions for classifying the data for a give segment. The output 
products from the LACIE 6 system are the DTRM tape and the CANS/ 
CAS tape. The OTRM tape contains images with results of clustering 
(unconditional cluster map) , results of an automatic cluster 
labelling procedure (conditional cluster map) , and classification 
of the entire scene based on results of both of the above (classi- 
fication map) . (Figure 3-1 also shows the place of the DTRM tape 
in the flow of LACIE processing.) The CAMS/CAS tape will provide 
cluster statistics and classification summary information. 

From this point, interactive operations allow the analyst to 
judge how well the entire procedure has worked. If he feels that 
the procedure has worked perfectly, he can accept results, have 
a report generated, update the data base, and exit the program. 

If, on the other hand, the analyst notes deficiencies, he can 
analyze them at the console of the Image-100, interactively. 

Since defects will mostly relate to dot labels, he may display 
all dots, or any subset of them, in spectral coordinates as well 
as spatial coordinates. He may examine individual dots in several 
ways, to see if their current labels are correct. He may exeunine 
the "trajectory" of each dot, that is, its changes in spectral 
coo^rdinates from acquisition to acquisition, to see if it has 
behaved as did other dots with the same label. 

He may also change labels interactively. In some cases, if 
labelling is grossly defective, he will need to resubmit the 


segment for reclustering and classification. In most cases, it 
should only be necessary to use statistics already available for 
reassigning clusters to yield a new classification map without 
resubmission to the LACIE 6 system. 

When the analyst is satisfied with results, he generates a report 
and updates the data base. His new results are then passed on to 
CAS for aggregation calculations. 



3.1 HARDWARE DS8CR1PTI0M 


The hardware configuration for the CAMS Hybrid I-lOO syeteni is 
presented in Figure 3-2. Manuals for the PDF 11/45 computer and 
RSX IID operating system are provided by the Digital Equipment 
Corporation (DEC) . Manuals for the peripherals are provided by 
the vendors for the specific devices. Tt is beyond the scope of 
this document to define in detail the hardware components asso- 
ciated with the system. 

3.2 DISK STRUCTURE 

This section describes the structure of the two disks required 
for operational use of the system. 
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Figure 3-2,— CAMS/I-100 Hardware Configuration 


















3.2.1 SYSTEM DISK 

The system disk Is an RP04 disk pack configured as shown in 
Figure 3-3A. The functions of the various segments residing on 
the system disk and critical to or supportive of the CAMS system 
are as follows: 

e RSX-llD operating system - a resource-sharing executive 

designed to run on the PDF 11/45 digital computer in a multi- 
program environment. 

e CAMS I-IOO/ERIPS Hybrid System - those computer programs 
required to accomplish the processing of the I-lOO/Procedure 
1 Hybrid Interface and Interactive Displays. 

e Image Library - those common functions originally developed 
by the General Electric Co. to support the Image-100 system. 

e Terminal Control System (TCS) Library - those common functions 
developed by the General Electric Company to support the 
graphics display terminal. 

e Image-100 System (IMA) - Those programs originally developed 
by the General Electric Company for the Image-100 and added 
to by Lockheed and Aeronutronic Ford Corporations. 

e Data Base Directory and Disk Table File - The Data Base 
Directory contains segment level Information pertaining to 
acquisition dates and classification results for all segments 
in the data base. Disk Table File contains the disk ID for 
each segment. 

• Working Data Files for CAMS - a receptacle for those working 
results generated by interactive processing and for global 
common as written by each processing program just prior to its 
termination. 

The following "User Identification Codes" (UIC's) are reserved 
for the CAMS I-lOO Hybrid System on the system disk and contain 
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the indicated data or software files. 

[300.1] - All working files for the interactive programs. 

(Defined in Section 3.4) 

[300.2] - CAM run UIC 

[300.3] - Source files for all programs and private subroutines 

[300.4] - Object files for all programs and subroutines 

[300.5] - Task and task build command files for all programs 

[300.6] - Source files for all shareable and utility routines 

[300,300] - Data base directory file and segment index file. 
(Defined in Section 3.3.1) 
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Figure 3>3: System Disk and Data Disk Configuration 
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3.2.2 DATA BASE DISK CONFIGURATION 

The CAMS I-IOO Hybrid System Data Base is maintained on multiple 
RP04 disk packs configured as sho%m in Figure 3-3. Bach disk pack 
is initialised with a "disk identifier file" which contains a 
unique number identifying that disk pack. All files on all disk 
packs are maintained under the UIC [300,300]. Definitions of the 
various files are as follows. For more detail see Section 3.3. 

e Disk Header Pile - File uniquely identifying the disk pack. 

File name is [300,300] HDRREC.DA7. 

The following files may exist for each segment. Maximum number 
of segments per disk pack is 80. 

e Imagery Files - No more than six acquisitions per segment of 
imagery data as read from the Universal formatted tape off- 
loaded from the LACIE data base. 

e Dot Date Files - 209 dots per segment are described by spatial 
coordinates, category labels, type, and dot spectral informa- 
tion. 

e DO/DU Files - a maximum of 50 DO/DU fields are described by 
field identification, field type and a maximum of ten vertices. 

• Statistics Files - statistical information and supporting data 
as extracted from the CAMS/CAS Interface Tape. 

e Cluster Map (Permanent or old) - the cluster map which the 
analyst has determined to be currently the most accurate. 

e Cluster Map (Temporary or latest) - the cluster map which has 
been read from the DTRM tape and has not yet been examined by 
the analyst. 

• Classification Map (Permanent) - the classification map which 
the analyst has determined to be currently the most accurate. 

• Classification Map (Temporary) - the classification map which 
has been read from the DTRM tape and has not yet been examined 
by the analyst. 
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3.3 DATA BASE DESCRIPTION/FILE FORMAT 

The CAMS Image-100 Hybrid System data base was designed to take 
advantage of the POP 11/45 operating systems efficient filing 
system. All data Is file oriented, a file naming convention was 
adopted for the data base so that the operating system could be 
used for quick retrieval of files by name. 

The data is segment oriented and resides on multiple disk packs 
which must be mounted on device "082** one at a time as needed. 

The system disk has two controlling files which keep track of all 
segments and the disk pack that each segment is on. 

A segment must be first introduced to vhe Image-100 data base by 
input of imagery data to the "Image Update Program" (IMAUPD) . 

The system is programmed to handle a maximum of 200 segments on 
all disk packs. Approximately 80 segments can be loaded on to 
one disk pack. 

The following Data Base File Naming Conventions were adopted. 

Data Base Disk (DB2t) UIC « [300,300] 

XXXX s Segment nvunber 
YYDDO > Julian Date 


XXXXYYDDD.DAT 


Imagery Piles 


XXXXPCLAS.MAP 

XXXXTCLAS.MAP 

XXXXPCLUS.MAP 

XXXXTCLUS.MAP 

XXXXPSTAT.DAT 

XXXXTSTAT.DAT 


Permanent 

Temporary 

Permanent 

Temporary 

Permanent 

Temporary 


classification map 
classification map 
cluster map 
cluster map 

stats and summary information 
stats and summary infomation 


XXXXDDOTS.DAT - Dot data 
XXXXFIELD.DAT - Fields 
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Systcan Disk QIC ■ [300«3001 

DIRPILB.DAT - Directory file 

D8KTBL.DAT - Segment disk table file 

The remaining sections in 3.3 provide details on each of the above 
files. 






3.3.1 DIRECTORY PILE (8Yt [300 » 300JDIRFILE.DAT) AND DISK TABLE 
FILE (SYt [300, 3001DSKTBL.DAT) 

The Data Base Directory File is a multi-record direct access file. 
Each record is formatted as above and is segment oriented. The 
record for a segment is from this file at 'Initiate* time and 
moved, as is, to the common block C(M2. The interactive programs 
update COM2 and the 'Data Base Update' program moves COM2 back 
to the appropriate record in the Directory File. 

The Directory File interacts with the Disk Table File, to account 
for and locate any element (or elements) of data in the CAMS 
I-lOO Hybrid Syst«n Data ^ase. Collectively they contain seg* 
ment level information pertaining to acquisition dates, classi- 
fication results and dates on which files were last updated. 

The directory is updated each time there is a change in the data 
base, vdiether the change is made in batch mode or on interactive 
command. The disk table file is updated by the Image Update and 
Image Delete programs. 

Both files are resident on the system disk under the UIS [300,300). 
The following progreuns access the files. 

e Office Programs 

IMAUPD 

FLDUPD 

DOTUPD 

BSTAT 

DTERM 

SEGDEL 

e Interactive Programs 

INIT 

PRMUPD 



All of tho above program* perform update* to t)M directory file 
except XMIT. The directory file i* unformatted and direct acce**. 
Record* are eegment oriented, *o that once the record number for 
a given eegment ha* been determined all information in the direc* 
tory for that eegment can be retrieved with a direct read of that 
record. 

Moat program* utilize the routine DSKCHX to determine the record 
number for the eegment in the directory and whether or not the 
correct diek pack for a given eegment is mounted. The routine 
D8KCHK determines this by reading the diek table file and 
searching for the indicated segment. The index of the successful 
search is the record number for the segment in the directory file. 

The format and content of the individual records of the directory 
file is identical to common block COM2 which is documented in 
Section 3.4. 


3.3.2 IMAGERY DATA FILES 


Imagery data files are maintained for up to six acquisitions of 
each segment. The files are uniquely named by the four digit 
segment number followed by the five digit Julian date for the 
acq*»isition. The files are generated by the offline program 
"IMAUPD” from image unload tapes from the LACIE 6 system. The 
files are LACIE segment size images (i.e. 196 pixels by 117 lines 
and 4 channels) . 


3.3.3 DOT DATA FILES (DB2t [300, 300] XXXXDDOTS.DAT) 

Dot data files, consisting of 209 dots per segment, each of which 
is described by spatial coordinates, labels (analyst and classi- 
fication) , type and dot spectral l.nformation, are autooiatically 
created upon introduction of new segments into the system, and 
may be updated from that point on either batch mode (cards) or 
interactively. 

The offline program IMAUPD originates and updates the dot data 
files by extracting the spectral values from each acquisition of 
the image data. The files may also be updated by the offline 
programs DOTUPD and FLDUPD. The dot update program "DOTUPD" 
sets the analyst label and type fields. The field update 
program "FLDUPD" flags dots lying in DO/DU fields. 

The analyst label and type fields may be altered interactively. 
Interactive modifications to these fields are not reflected in 
the data base files unless the analyst executes the interactive 
data base update program "PRMUPD". 

The following is a complete list of the progr£uns which must access 
the data base dot data files. 

e Offline Programs - IMAUPD, DOTUPD, FLDUPD, SEGDEL 
e Interactive Programs - IMIT, PRMUPD 

The file content and format is identical to the working file 
DOTS.TMP documented in Section 3.4.4. 



3.3.4 DO/DU FIELD DEFINITION FILES (DB2: [300, 300jXXXXFIELD.DAT) 

A DO/DO field definition file is maintained for each segment. 

For each segment there is a maximum of fifty fields allowed. 

These fields have the attributes of field identifier, type of 
field and a maximum of ten vertices. The files are created after 
the segment has been introduced into the system and upon receipt 
of a field definition card deck, or by interactive definition of 
the fields. 

The following programs must access these data base files, 
e Offline Programs - FLDUPD, SEGDEL 
e Interactive Programs - INIT and PRMUPD. 

The file format is identical to the working file FIELDS. TMP 
documented in Section 3.4.1. 
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3.3.5 CLASSIFICATION RESULTS FILES 

Classification results consist of the following items » cluster 
map, classification map, cluster statistics and classification 
summary information. This information is retrieved from the 
CAMS/CAS Interface tape and the DTRM tape frcm the LACIE 6 system. 

Two each of the following files eure maintained in the data base 
for each segment. 

a. Classification Map Files -> contains one 196 pixel x 117 scan 
line image representing the results of cxassificatlon to the 
category level. (DB2: [300,300]XXXXTCLAS.MAP and DB2[300,300] 
XXXXPCLAS.DAT 
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b. Cluster Map - contains one 196 pixel by 117 scan line image 
which is an image product of the LACIE clustering function. 
(DB2: [300,300]XXXXTCLUS.MAP and DB2: [300,300]XXXXPCLUS,MAP) 

c. Statistics File ** contains the following elements extracted 
from the CAMS/CAS Interface tape and DTRM tape. 

(DB2: [300, 3001XXXXTSTAT.DAT and DB2: [300,300]XXXXPSTAT,DAT) 

e number of categories 

• number of subclasses (clusters) 

• number of channels 

• number of pixels in DO 

• number of pixels in DU 

• number of pixels thresholded out 

• number of pixels in the segment 

• number of pixels in each category 

a number of pixels in each subclass (cluster) 

• channels used in classification 

• acquisition dates used in classification 

• cluster/category cross index 

• cluster means and standard deviations 

• date of classification 
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• cluster number to which each dot was assigned 
e category to which each dot was assigned during classifica* 
tion 

The "t^porary* files (i.e. those which have a T in the file name 
following the segment number) are updated only by the offline 
programs BSTAT and DTEim which read the latest results from LACIE. 
The only other program accessing the temporary files is the 
interactive program INIT, and the offline program SEGDEL. 

The temporary files are made the "permanent" files (i.e. those 
which have a P in the file name) only by interactive decision 
by the analyst. This is done by the program PRMUPD. The programs 
INIT and SEGDEL also access these files. 

The format and content of these files are identical to the working 
files presented in Section 3.4. 



3.3.6 DISK PACK INITIALIZATION FILE > OB2: [300, 300] HDRREC.DAT 

Each of the data base disk packs must have this file on it before 
any segments can be added to the pack. The file is one record 
containing a unique identifier for that disk pack. The file may 
be generated by the POP 11/45 system editor emd PIP with the 
following steps. 

1. MCR>HEL [300,2] 

2. MCR>EDI 

3. EDI> HEAD.DAT 
-CREATING NEW FILE- 
INPUT 

4. 5 

5. C/R 

6. *EX 

7. make sure that the disk pack labeled number 5 is mounted 
on DB2 

8. MCR PIP DB2: [300, 300lHDRREC.DAT = HEAD.DAT 
Step 4 is the input of the disk pack number. 

The following programs access this file to ascertain that the 
correct disk pack is mounted for a given segment. (The routine 
DSKCHK performs this function.) 

• Offline programs 

IMAUPD BSTAT 

DOTUPD DTERM 

FLDUPD SEGDEL 

e Interactive program - INIT 
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Th« files defined in this section are those working files which 
reside on the system disk during an interactive session. Some 
of the files are initialized by transferral from the data base 


in the Initiate Segment Analysis program, others may be generated 
during processing to pass information from one processing function 
to another. All working files reside under UIC [300,1] on the 
system disk. 

The interactive Data Base Update program transfers those files 
which were updated back to the data base disk. 

3.4.1 FIELD DEFINITION FILES 

The ' Initiate Segment Analysis * program checks the data base 
existence flag for this file. If the file exist in the data base 
for the segment, that file (XXXXFIELD.DAT) is copied into the 
file [300,1] FIELDS. TMP. The existance flag, EFLA63, in commoti 
COM 3 is set accordingly. 

The interactive program Field Definition reads this file and 
optionally displays, deletes and adds fields. The file [300,1] 
FIELDS. TMP is overwritten with the updated fields. If fields 
were deleted or added this program sets the update flag UFLAG2. 

The Reports program reads this file and generates a report. The 
Recompute Proportion program must access this file. 

The interactive Data Base Update program copies the file back to 
the data base file (XXXXFIELD.DAT) if UFLAG2 is set. 

The file is written with unformatted FORTRAN write statements in 
the following format. 

JJjf 




Record 1 



Variable 

Type 

Definition 

NOFLD 

I 

Number of fields in the file. 

Records 

2 through NOFLD -¥ 1 


FLDNAM 

A 

Name of the field. 6 bytes 

LABEL 

B 

Number of vertices. 

NV 

B 

-1 for DO fields » -2 for DU 
fields. 

VERTEX 

B 

Coordinates of each vertex 
ordered as (x,y) or (pixel, 
line) . These spatial coordi- 
nates reflect the vertex posi- 
tion in the data base image 
rather than the displayed image 


Exaunple Usage: 

BYTE NV, VERTEX 

DIMENSION FLDNAM (3, MAXFLD) , LABEL (MAXFLD) , VERTEX (2, MAXV, 
MAXFLD), NV (MAXFLD) 

CALL ASSIGN (LUN, ’SY: [300,1]FIELDS.TMP' ) 

READ(LUN) NOFLD 
DO 10 I = 1, NOFLD 

READ(LUN) FLDNAM(I), LABEL (I), NV(I), VERTEX(J,K,I) , J»l,2) , 
K=1,MAXV) 



10 CONTINUE 


3.4.2 CLASSIFICATION MAP FILE 


The Initiate Segment Analysis program asks the analyst whether 
he wants the permanent or temporary classification results from 
the data base. If he responds 'permanent*, PFLA6 is set to one, 
the existence date is checked and if it exists, the file 
XXXXPCLAS.MAP is copied from the data base into the working 
file SY : [ 300 , 1 ] CLASSMAP . TMP . 

If he responds 'temporary', the data base existence date is 
checked for the file XXXXTCLAS.MAP. If it exists in the data 
base and the date matches the other classification results file 
dates, the file is copied into the working file SY: [300,1] CLASS 
MAP. TMP. The working file existence flag EFLAG2 is set accordingly. 

The Classification Map Display program checks the flag EFLA62 
before attempting to assign the file. The Display portion of 
this program treats this file as a read only file. However, the 
Recompute Proportions module overwrites this file with a new 
classification map. When this happens, the program sets the 
update flag UFLAGl. 

The interactive Data Base Update programs checks the flag, PFLA6; 
if equal 0, the file SY: [300,1]CLASSMAP.TMP is copied back to the 
data base file XXXXPCLAS.MAP. If PFLAG»1, (Common/COM3/) , then 
the update flag UFLAGl is checked, if the file has not been 
updated then the copy is not necessary. 

The file is direct access by scan line number, with the following 
format. 

Records 1 through NLIN 

BUF(NPIX) - NPIX bytes in length 
where 

BUF(k) = category number to which pixel k was 
assigned in classification. 

3-24 




Bxttsple Usage: 

INCLUDE 'EY: [300, 3]CANSPARAM.INC* 

DIMENSION BUF (NPIX) 

LUM - 3 

CALL ASSIGN (LUN, 'SYt [300,1]CLAS8 MAP.TMP) 
DEFINE FILE LUN (NLIN, NPIX, U, NSEC) 

DO 10 LINE s 1, NLIN 
READ (LUN 'LINE) (BUF (I) , I « 1, NPIX) 
process this scan line 
10 CONTINUE 


3.4.3 CLUSTER MAP PILE 


Th« Initiate Segment Aimlvsis program asks the analyst %rtiether 
he wants the permanent of temporary classification results from 
the data base. If he responds 'permanent', PFLA6 is set to 1, 
the data base existence date is checked and if it exist, the 
file XXXXPCLU8.MAP is copied to the working file SYt [300,1] 
CLUSTERMP.1MP. 

If he responds 'temporary', the data base existence date is 
checked against other classification results dates, and if it 
exist, the file XXXXTCLUS.MAP is copied to the working file 
SYt [300,1]CLUSTERMP.TMP. 

The working file existence flag EFLA61 is set accordingly. 

The program Cluster Map Display checks the existence flag EFLA61 
before assigning this file. The file is a read-only file. It is 
never modified by the interactive programs. The Recong>ute Pro- 
portions module in Classification Map Display also checks EFLAGl 
before attempting to use the file. 

The Data Base Update program checks PFLAG. If equal 0, and 
EFLAGl^l, then this file will be copied back to the data base 
file XXXXPCLUS.NAP. Copy is not necessary if PFLAG»1. 

The format of this file is identical to the CLASSMAP.TMP file, 
except the map will reflect cluster number rather than category 
number. 



3.4.4 DOT DATA FILE 


The Initiate Segment Analysis program copies the data base 
XXXXDOTS.DAT into the working file SY: [300,1] DOTS. TMP. Some 
information (dot types and analyst labels) in the data base file 
is placed in common/COM2/ for quick access. This file is always 
existent in the data base if the segment has been introduced to 
the directory. The data base file and the working file formats 
are identical. Records may be retrieved by dot number. The 
number of records is NDOTS (209). 


Format of individual records in the file is as follows: 


Repeated 
for each 
acquisi- 
tion 


Record k (or dot k) 

Byte 1 Spatial coordinate pixel number 

2 Spatial coordinate line number 

3 Type 

4 Category index 

5 Reflectance (Spectral) value - channel 1 

6 Reflectance (Spectral) value - channel 2 

7 Reflectance (Spectral) value - channel 3 

8 Reflectance (Spectral) value - channel 4 

9-10 Greenness - acquisition 1 

11-12 Brightness - acquisition 1 
13-20 same as above for cheumels 1-4 acquisition 2 
21-28 acquisition 3 
29-36 acquisition 4 
37-44 acquisition 5 
45-52 acquisition 6 


acquisition 1 
acquisition 1 
acquisition 1 
acquisition 1 


The Initiate Segment Analysis progreun stores the analyst labels 
from the data base file into 'DLABEL* and the type field into 
'TYPE* of common/C0M2/ . 



The Data Baee OPdate Prograae oheeka DPIAGS# if labels have been 
updated then the file XXXXDOTS in the data baee is updated from 
common parameters 'OLABBL* and 'TYPE*, and an offload of the Dot 
Data file in card image format is effected automatically. An 
offload of the file may be found at analyst option if no updates 
to the file have been made. This is also true of DO/DU data. 


3.4.5 CLUSTER STATISTICS PILE 

Global coimnon/COMl/ will reflact record one from either the 
XXXPSTAT or XXXXTSTAT file# as retrieved from the data base. 

The remaining records from that data base file are copied to 
the working file SYt (300,1 ]CLOSTATS.TMP and existence flag EPLAG5 
is set by the 'Initiate Segment Analysis' program. The format of 
the data base file is presented on the next page. 

The working file is a direct access file with records retrieved 
by cluster number. 

The file SY: [300, 1]CLUSTATS.TMP is never modified interactively. 
However, some of the parameters in /CONI/ may be updated. The 
Data Base Update program checks UFLAG4, if rework has occurred 
or if PFLA6-0, all records of the file XXXXPSTAT must be updated. 



















3.4.6 NEAREST NEIGHBOR FILE - (NN.TMP) 

This file is written by the *Aut(»aatic Cluster Labelling* 
module and used in 'Cluster Map Display* and 'Reports*. Informa- 
tion in this file is not carried in the data base. 


An existence flag (EFLAG4) is set by the creating program and 
checked by the using programs. 


File Format 


Record 1 

Variable 

KNN 

ND 


Type 

Integer 

Integer 


Records 2-(NOSUB-t-l) 
Variable Type 

DOTN Integer 


DLAB 


Integer 


DIST 


Real 


Definition 

Number of nearest neighbors used. 
Number of lcd>elling dots used. 


Definition 
Dot number grid. 

Analyst label for this dot. Index 
to CATNAM. 

L-1 Distance from cluster mean to 
this dot. 


Example Usage 

INCLUDE ' SY : [ 300 , 3 ] CAMSPARAM . INC ' 

INTEGER DOTN, OLAB 

DIMENSION DOTN(NOOT), DLAB(NDOT) , DIST(NDOT) 
LUN = ? 

CALL ASSIGN (LUN, *SY: [300, IJNN.TMP, lER) 

READ (LUN) KNN, ND 
DO 10 I = 1, NOSUB 

READ (LUN) (DOTN (K) , DLAB(K) , DIST(K) , K»l, KNN) 
processing for this cluster 
10 CONTINUE 
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3.4.7 DOT GRID SCREEN COORDINATE PILE 

The Initiate Segment Analysis program creates this file as 
[300,1]DOT6XY.TMP and initializes it to all ZER0ES. 

The interactive Image Display program will* after displaying the 
image, write the screen coordinates of all 209 dots to this file. 
If a dot physically occupies several pixels on screen, the screen 
coordinate of the upper left corner of the pixels will be stored 
in this file. 

The interactive Dot Labelling program will search the stored 
coordinate pairs of this file in order to find the dot identifi- 
cation (dot grid number) . 

This file has one record which consists of 209 2-word entries. 
First word of each entry is the dot grid screen coordinate on 
horizontal axis, second word is the dot grid screen coordinate 
on vertical axis. Entries are ordered in dot grid screen. The 
value of each entry ranges between 0 and 511. 


3.4.8 SPECTRAL PLOT SCREEN COORDINATE PILE 


The Initiate Segment Analysis program will create this file as 
[300,1]SCATXY.TMP and initialize it to all 

The interactive Dot Group Scatter Plot program will write the 
screen coordinates of all dots used to compose the scatter plot on 
a given window to a record of this file whose record nundser is 
corresponding to the window number, and this program will also 
set the same record for this given window to zero if this window 
is erased. If a dot physically occupies several pixels on screen, 
the screen coordinate of the upper left corner of the pixel will 
be stored in this file. 

The interactive Dot Labelling program will search the stored 
coordinate pairs of this file in order to find the dot identifi- 
cation (dot grid number) . 

This file is a multiple record file. The number of records is 
equal to the number of spectral, windows defined in the system 
(see NOSPWD in the system parameter list for this number) and 
the record number affects the window number. Each record of this 
fiel has the same forms as specified for the Dot Grid Screen 
Coordinate file. This file can be direct access by record number. 



3.4.9 GLOBAL COMMON FILE - [300, 1] GLOBAL. TMP 

The purpose of this file is to provide a restart capability from 
a system crash. Before exiting every interactive program updates 
this file. The source code for doing this update is provided in 
source code files for inclusion in each interactive program for 
compilation. 

An example of the source code provided in the file, SY: [300,3] 
CAMSCOMON.INC, follows: 

INCLUDE *SY: [300,3]CANSPARAM.INC 
EQUIVALENCE (C1,ACDAT, (C2, ANALiS*’) 

EQUIVALENCE (C3, ISEG) , (C4, TXl) 

DIMENSION Cl ( ) , C2 ( ) , C3 ( ) , C4 ( ) 

COMMON/COMl/ACDATE, 

COMMON/COM2/ISEG, 

COMMON/COM3/PFLAG, 

COMMON/COM4/TX1, 

COMMON/COM5/DISKID 

The above file is included in the FORTRAN source for each program 
with the FORTRAN statement: 

INCLUDE • SY : [ 30 0 , 3 ] CAMSCOMON . INC ' 


The following source code is provided in the file 
SY ; [ 300 , 3 ] CAMSAVE . INC . 

CALL ASSIGN (1, 'SY: [300, IjGLOBAL.TMP' ) 

WRITE (1) Cl 
WRITE (1) C2 


This code is included before exiting program modules by the 
FORTRAN statement INCLUDE *SY: [300, 3]CAMSAVE. INC. 
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The 'Initiate Segment Analysis' program performs a similar read 
to restore the common area if the analyst has indicated a 'RESTART' 
mode of operation. 

The subsections of 3.4.9 define each parameter in the five common 
blocks. 


3. 4. 9.1 COMl 

This common block will initially reflect Record 1 of either the 
XXXXPSTAT or XXXXTSTAT file as retrieved from the data base. Scmte 
of the parameters will reflect I-lOO rework of the segment. 





COMMON BLOCK NAME /COMl/ 
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COMMON BLOCK NAME COMl (continued) 
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COMMON BLOCK NAME COMl (continued) 
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3. 4. 9. 2 COM2 


The parameters in this common area will reflect Initially infor- 
mation retrieved from the directory file. Many of the parameters 
in this common may be updated interactively and must be saved 
again in the appropriate records at data base update time. 

The 'Initiate Segment Analysis' program allows the analyst to 
type in the segment number desired, then retrieves the appropriate 
record from the data base directory file and moves that record 
into the common block COM2. The format of directory file records 
is presented on the next page. 
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COMMON BLOCK NAME COM2 (continued) 






O fH 

O Ck 
C -H 


10 -P 
•H rH 


U 0 


$ £ 


o 

§ 


M 

> 




3 .- 45 ^ 



3.4.9. 3 COM3 

This cammon block reflects run-time parameters and flags which 
require no data base update thonselves but flag those files 
iidiich must be updated. 
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Figure 3-3e.- COM3 



UFLAG4 Bias-Correction Flag Set by 'Bias-Correction* 
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3. 4. 9. 4 COM4 


This common reflects current display information concerning 
refresh memory. Information in this common is carried in the 
data base. 
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Gains applied to image when S 2 uae as above 

displayed. Originally floating 

point numbers, multiplied by 

100, truncated and used as integers. 
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COMMON BLOCK NAME COM4 (continued) 




COMMCM BLOCK NAME COM4 (continued) 


s .. 

•H M 


S3 S 

1 * 

<A I 
« 18 
P > 


r 

O 4 -4 


4i 

CO <o 


_ « -H I 

s ti s 

M 9 > 

? s & ® 

ta n 

“• a ■o ^ 
S-'o 8 I 

H C 0 H 


cu n 

m 


6 ^ 
1 1 
*» 






Q) 

g 

n 

9 

c 



fS 


0 » 

• 

10 

•H 


0 

0% 

tn 

S 

% 


tM 


0 

CM 

fO 

CM 

s 

CO 

iJ 

9 





M 

>1 

•0 

<U 

II 

n 

n 

II 



H 


no 


(U « « 

s a a £ s s € 


•o o « 
*H o M 

M #H ^ 


c • 

H H 


1 1 
: ^ 
fi & 

fH 
% IH 

u 

? a 

o« « 

>1 » 
fO (0 
•H O 
Oi u 
to o 

•H 

a Oi 
9 

9* ? 

<0 u 

s o 






0) 

•0 


0 

•0 



D 

i: 

9 


5 

9 

c 

•0 


X 

<p 

•H 



0 

C 


«k 


» 



> 

•H 

4J 

•H 


g 

44 

0 


g 

44 

0 

0) 

•H 


•0 






X 

6 

>1 

9 

1 

CO 

4> 

1 

CO 

4* 

•H 

<0 

•H 


0) 



01 


44 

fH 

> 



44 


4i 

44 

£ 

Oi 


% 

9 

0 


(0 

0 

CO 



9 


<n 

9 


•H 


•H 

M 


•H 

M 


a 

M 

CO 

n3 

0) 

CO 

*0 

0) 



0 

*0 

M 

9 

•d 

U 

9 


0) 


u 

8 

M 

M 

0 

W 

/ 

O' 


p 

0 

0 

0 

0 


s 

H 


a 

C^ 

U 

a 

0 

u 


# 

• 



• 




4> 

Is? 

•H H a 

u g o 
fo s a 

> H 


S(, 


the Field Definition program 
. and the Dot Labelling program 
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J»6 is the brightness 
J«7 is the green number 
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3. 4. 9. 5 C0M5 

This conmon block contains dot information retriavad fron tha dot 
data f^la. 
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3 . 5 SOFTWARE DESCRIPTION 


The software for the CAMS/I-100 system fall into two major 
groupings. The first contains those batch, or operator controlled, 
programs required to update the data base with new acquisitions, 
card dot data and DO/DU fields and classification results from 
ERIPS. The second contains those interactive programs with which 
the analyst must perform his analyses. 

3.5.1 OFFLINE DATA BASE UPDATES 

All programs in this section will be executed either batch or by 
an operator responding to queries at a terminal. In the latter 
case, he will have convenient access to the tape drives and card 
reader. 

Since the offline data base update programs must open and use the 
same files that the interactive programs use, data base updates 
must be scheduled around interactive sessions at the 1-100 
terminal . 


(oX> 


3. 5. 1.1 Imagery Update (IMAUPD) 

INAUPD maintains the data base file for the Image<*l00 Hybrid 
System. The program adds new segments and adds and deletes 
acquisitions. 

3 . 5 . 1 . 1 . 1 Linkages 

IMAUPD is the driver program for the Image-100 Hybrid Directory 
Update system. It calls the following programs or subroutines 
to perform its task: DELEAT. DIRCRE. FILEST. RDCISK, SROISK. 

REPORT, and STRAYS. Other programs which are used at various 
times during program execution are RDHEAO, TAPSCN, and JULIAN. 
To read and write data, both from tape and the disk, the 
Imagery Read Utility routines are used. 

3. 5. 1.1. 2 Interfaces 

DIRUPD does not interface with any other system. It is a 
stand-alone program. 

3. 5. 1.1. 3 Inputs 

Input to DIRUPD is an Image Data tape in Universal format. 

3. 5. 1.1. 4 Outputs 

Each time an acquisition is added to the. data base, the Imagery 
Data file from the input tape is stored on the disk. The file 
name contains the segment number (s), the year (Y) , and the 
Julian day (D) . -SSSSYYDDD.DAT-. 

3. 5. 1.1. 5 Storage Requirements 

IMAUPD requires 111 blocks of computer space. 


<r,3 
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3. 5. 1.1. 6 Description 

DIRUPD is primarily a driver program. It calls a group of sub- 
routines which perform the required functions. These subroutines | 

will check the header record of each Image Data file to obtain | j 

the segment number of that file. Having the segment number » I 1 

1 i 

the program can check its disk table file (DSmPBL) to determine I j 

if this segment has already been entered on this disk. If so, 1 

- ^ 

the program will update the existing file with the new acquisi- 1 

tion. If it is a new segment » the program must add it to the | | 

data base and made a new entry in the DSKTBL file. The acquisi- 
tion dates and other information concerning each acquisition 

i 

are maintained on the directory file (DIRFILE) . The system i 

allows for six acquisitions per segment number. In order to 

keep the number of acquisitions within limits, a delete flag 

is provided in the DIRFILE. It can be set to 1-6, and that 

acquisition will be deleted. Acquisition information in the 

DIRFILE are kept left justified in their respective fields. 

Upon completion of a run, the progr 2 un prints a report of action 

it has taken. i 

3. 5. 1.1. 7 Flowchart (See figure 3-4) 

See figure 3-4. 

3. 5. 1.1. 8 Subroutines 
SRDISK 

t 

SRDISK is the first stibroutine to be called by DIRUPD. It in 

turn calls RDHEAD, which reads the header record from the Image i 

Data tape. Imagery Read Utility routines are used to read the 

Image Data tape. At this point, if the data file does not ] i 

contain the proper numbers of channels, a diagnostic is printed \ 

> ■ 

on the line printer, and a flag is set to stop processing of | 

this segment. Otherwise processing continues by interviewing | 
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the segment number and date. A file name is constructed for 
the data file to be stored on the permanent data base. This 
file name must be in ASCII, and it will contain the segment 
number (N ) , the year (Y) , and the Julian day (D) . The file name 
format is NNNNYYDDD.DAT. This completed, control is returned 
to DIRUPD. 

DIRCRE 

DIRCRE is called to determine if the segment is already on the 
data base. The disk table (DSKTBL) record is searched for the 
segment number being processed. DSKTBL is a double dimensional 
array, two words wide (N,2). Word one is the segment number 
and word two is the disk pack number on which that segment is 
stored. If the segment is not found, the now segment number 
is stored in the first empty segment word in the DSKTBL record. 

If a new segment is added, the program then determines if the 
disk pack which is mounted has space for this segment. If not, 
the program searches the other disk pack until it finds one on 
which to store the segment. To do this, the program has set up 
an array as large as the total number of segments. Then it 
goes through the DSKTBL and counts the number of segments on 
each disk. If a different disk pack is required, either for a 
new segment or an old segment, the necessary information needed 
to reactivate the segment is stored in an array (TOBDON) , and 
a flag is set to stop processing of this segment. If the segment 
is to be placed on this disk pack which is mounted, processing 
continues with the next phase. 

FILEST 

FILEST stores the Image Data file on the disk pack using the 
Imagery Read Utility routines. The entire Image file, including 
header record, is read onto th permanent data base. 
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^ DELEAT (the program for deleting acquisitions) 


ORtGINAli 
OR POOR QUaUTY 


The data base will accommodate six acquisitions for each segment. 
To delete an acquisition, in order to add a new acquisition, 
the delete flag in the Directory record (DIRFILB) must be set 
to a value of 1-6. The delete flag is byte three of the DIRFILE 
record for each segment. If the delete flag is not set, the 
segment will be added in sequence. If the delete flag is set 
to a legal acquisition ntimber, that acc{ulsition is deleted and 
the remaining acquisitions are packed to the left. The new 
acquisition is then added in sequence. If the delete flag is 
larger than the nximber of acquisition stored but within the 
range of 1-6, the delete flag is set to zero, and the new acqui- 
sition is added. A delete flag which is out of range causes 
a diagnostic to be printed on the line printer, and processing 
on that segment is terminated. DELEAT also retrieves the green 
number, the sun angle, and the azimuth value from the header 
record and stores these values in the Directory record. The 
acquisition date which was retrieved earlier is also stored in 
the Directory record. 


RDDISK 

Using the Imagery Read Utility routines, RDDISK reads the data 
file from the permanent data base and passes the required data 
to the Data Dot programs. The Data Dot progreuns create or 
update the Data Dot file. 

STRAYS 

STRAYS is called to process segments which were not stored on 
the permanent data base which was mounted. The array TOBDON is 
used to determine which segment's need to be processed and which 
disk packs need to be mounted. The subroutines which were 
used to store segments on the disk pack which was originally 
mounted when processing began are used oy STRAYS to process the 
segments . 
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REPORT 


Subroutine REPORT prints a 'summary of the action taken by 
DIRUPD. It lists the segment number and the date the data was 
recorded. The number of acquisitions which have been stored 
for that segment is listed. THe value of the delete flag and 
the date that was deleted is printed. The sun angle » azimuth, 
and green number are listed, followed by the number of records 
read from the data file, the number of parity records encountered, 
and the number of blocks used to store the file. 



The information on pages 3-77 through 3-87 was found to be 
redundant and was removed. 


3. 5.1. 2 FIELD FILE UPDATE (FLDUPD) (Programmed by Betsy Thompson; 
documented by Ken Pattison) 

The purpose of this program is to process the DO/DU field defini- 
tion card deck as generated in Del Foster format. This processed 
data will subsequently be used for two purposes: 

a. Update the CAMS Image-lOO Hybrid System permanent data base 
and directories. 

b. After reformatting and/or interactive modification data will 
be offloaded in ERIPS card format for re-entry into the ERIPS 
system. 

3. 5. 1.2.1 Linkages 

a. Shared subroutines 

1 . ELAPSE 

2 . DSKCHK 

3 . FLGDOT 

4 . FLDINT 

b. Private subroutines documented in section 3. 5. 1.2. 8 


1. 

CNTRL 

2. 

NCNTRL 

3. 

FLDST 

4. 

NFLDST 

5. 

FIELD 

6. 

NFIELD 

7. 

SEGEND 

8. 

NSEGND 

9. 

FLDEND 

10. 

INDBRT 

11. 

RDDIR 

12. 

RDDOT 

13. 

RODODU 


>4 


14. 

UPDOT 

15. 

KOMBRT 

16. 

EXPTD 

17. 

DCOORD 

18. 

JULIAN 

19. 

WRDIR 

20. 

WRDODU 

# 

s-l 

CM 

WROOT 


3. 5.1. 2. 2 Interfaces 

a. Working File NameCs) 

1. CARD.DAT • The file created by the batch stream deck and 
containing all card data input to the program. 

2. OUTFILE.DAT > The formatted report file generated by the 
program. 

b. Data Base Files 

1. DIRFILE.DAT 

2. DSKTBL.DAT 

3. 5. 1.2. 3 Inputs 

a. Cards - Reference user's manual for example deck set-up. 
There are six card ^pes. 

1. SEG XXXX - Segment identifier. 

2. DXXXXX or rxxxxx - Field name card and type identifier. 

D for DO fields, U for DU fields. 

3. -t-xxxxxx - XXXXXX - Field vertex (pixel, line) 

4. DEL XXXXX - Field delete card. I 

5. SEGDEL XXXX - Segment delete card 

6. //END - Segment end card 


a/ 


3.5.1.2.4 Outputs 

a. Reports - Field Definition Data Base Update Transaction Report- 
Obtained by PIP listing of OUTFII>B.DAT. 

b. DIAGNOSTICS - (reference or duplicate user's manual) 

c. Data base field definition files XXXXFIELD.DAT, where XXXX 
is the segment number. The file content and format is given 
in section 3.3.4. 

d. Updated directory file. 

3. 5. 1.2. 5 Storage Requirements 
102 blocks. 


3. 5. 1.2. 6 Description 

The Field File Update program executes in a batch mode and processes 
the segment update deck from the Del Foster field definition 
system. The input deck has the general format of: 

a. Control card with segment nvonber 

b. Field identification card with an action indication (default 
is 'ADD') 

c. Up to ten vertices 

d. An end of field/segment indicator 

A field-defining portion of this deck will be read and edited. 

If all cards pass the editing and the proper disk pack is mounted, 
the DO/DU Fields File for this segment will be updated and the 
Directory File updated to reflect the addition or deletion. A 
maximum of 50 DO/DU fields, in combination, are allowed in the 
systdm. Each field may have a maximum of 10 vertices defined 
for it. If one of these vertices is not the closing vertice, 
the closing vertice will be provided by the program. To modify 
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Figure 3-5.— Continued. 




a vertex, the field containing this vertex must be deleted and the 
field reestablished in its entirety. This program is required 
to identify those dots in the Dot Data File that fall within a 
DO/DU area and update the Dot Data Pile accordingly. 

3. 5. 1.2. 7 Flowchart 
See Figure 3-5. 

3. 5. 1.2. 8 Subroutines 

3. 5. 1.2. 8.1 CNTRL 

a. Calling Sequence 
CALL CNTRL 

b. Arguments as passed through local common blocks 

c. Description 

This subroutine is entered to process the CONTROL card. The 
action dictated by this control card is determined (ADD field or 
DELETE field) and flags set accordingly. The segment number is 
validated and the Directory entry accessed. If a Fields file 
exists for this segment, it is accessed for update, otherwise 
one is created. If a 'DELETE* action is scheduled, it is executed, 
otherwise the ADD is accomplished and the DOT Data file is updated 
if required. 

This subroutine validates the CONTROL card, updates the required 
files and directories and performs the ADD or DELETE as specified 
for this update. 

3. 5. 1.2. 8. 2 NCNTRL 

This subroutine is entered where a control card was encountered 
out of sequence while processing the input deck. 



a. Calling Saquenca 
CALL MCNTRL 

b. Arguments ara passad through local common 

c. Dascrlptlon 

Sinca a CONTROL card was not ^pactad at this point# a datarmina* 
tion of what was axpectad is made. Nhan the type of card that 
was expected is deteinnined# the appropriate massage is output 
to the printer and processing continues. 

3. 5. 1.2. 8. 3 FLDST 

The purpose of the subroutine is to prepare for the Initialization 
of a ne\<r field (set of coordinate vertices) or to delete the 
field identified by the FIELD ID card. 

a. Calling Sequence 
CALL FLDST 

b. Arguments are passed through local common 

c. Description 

Upon entry# this subroutine determines whether this is to be the 
initiation of a new field or the deletion of an existing field and 
sets indicators as required. The field ID is then validated. If 
this is to be a field delete action# the field is deleted# the 
file is compacted and required housekeeping is accomplished. If 
this is to be the initiation of a new field# the next type of 
card expected is set and file totals are housekept. 

3. 5. 1.2. 8. 4 NFLDST 

This subroutine is entered when a field start card was encountered 
out of sequence when processing the input deck. 

a. Calling Sequence 
CALL NFLDST 

>- 95 ^ 


b. ArguiMntt are pasted through local comnon 

c. Description 

Since a field start card was encountered but not expected at this 
point# a determination of what was expected is made. When the 
type of card that was expected is determined# the appropriate 
message is output to the printer# required housekeeping is 
accomplished and processing continues. 

3. 5. 1.2. 8. 5 FIELD 

This subroutine is entered when a coordinate defining field card 
has been read and the specified coordinates must be verified. 

a. Calling Sequence 
CALL FIELD 

b. Arguments are passed through local comnon 

c. Description 

Upon entry# the *X* and *Y' coordinates are edited and if found 
to be in error or missing# the appropriate error message is out> 
put. The total number of coordinates is checked and if the 
maximum number have been processed, the flag is set to indicate 
the next card should be either the end of the segment or the 
start of the next field definition. 

3. 5. 1.2. 8. 6 NFIELD 

This subroutine is entered when a field definition card was 
encountered out of sequence while processing the input deck. 

a. Calling Sequence 
CALL NFIELD 

b. Arguments are passed through local common 

c. Description 


>-<6 


Since a field coordinate definition card waa not expected at this 
point f a determination of %ffaat type of card waa expected ia made. 
When the type of card expected ia determined, the apprc^riate 
mesaage is output to Uie printer and processing continues. 

3. 5. 1.2. 8. 7 SE6END 

The purpose of this subroutine is to process the 'END* of segment 
card and provide processing and report generation contin- 

gent in the end of a segment being reached. 

a. Calling Sequence 
CALL SEGEND 

b. Arguments are passed through local common 

c. Description 

Upon entry, this subroutine checks if the number of fields in 
this segment has been reduced to zero and, if so, this field 
file is deleted. If the file still exists, the field file is 
written (via a ca.'l to subroutine WRDODU) and the Segment Report 
is generated. If required, the DOT DATA FILE is updated for the 
segment euid required housekeeping processing is accomplished 
(Directory update, next input expected, etc.). 

3. 5. 1.2. 8. 8 NSEGND 

This subroutine is entered when an end-of-segment card was 
encountered but was not expected while processing the input deck. 

a . Calling Sequence 
CALL NSEGND 

b. Arguments are passed through local common 

c. Description 

Since an end-of-segment card was not expected at this point, a 


determination of what type of card was expected is made. When 
the type of card expected is deteinnined, the appropriate message 
is output to the printer and processing continues. 

3. 5. 1.2. 8. 9 FLOEND 

The purpose of this subroutine is to process the end of field 
definition card (//END) , and provide wrap-up processing coincident 
with the end of a field being leached. 

a. Calling Sequence 
CALL FLOEND 

b. Arguments are passed through local common 

c. Description 

Upon entry, this subroutine forces the closing vector of the field 
to be established and increments the number of coordinates accord- 
ingly. If larger than 127, the 'X' coordinate value is transformed 
for storage in the logical buffer and then the closing vector 
coordinates are stored. The current update date is saved in the 
specified Directory entry and the indicator flags are set to 
expect either another field start card or an end of segment card 
next. 


3.5.1.2.8.10 INDBRT 

The purpose of this function is to find a substring of B imbedded 
in a substring of A 

a. Calling Sequence 

K = INDBRT (A, I, N, B, J, M) 

b. Arguments 

Parameter Dimension Type In/Out Description 

A A(l) Out The buffer to be searched. 









Paramstmr 

:. 4 . * 

X' 

Dinension 

Type 

1*2 

Zfi/Ottt 

Out 

Desoription 

Starting position of 
sear^ in buffer. 

N 


1*2 

Out 

Length of buffer to be 
searched. 

B 

B(l) 


In 

Buffer containing string 
of characters 

J 


1*2 

In 

Starting position in 
buffer for search. 

M 


1*2 

In 

Length of string to 
search for. 


This function searches string A looking for a match on string B. 
If a match is found* K is set to the starting location in A. If 
no match is found* K is set to zero. 

3.5.1.2.8.11 RDDIR 

The purpose of this subroutine is to read the direct access 
Directory File for the segment currently being processed. 

a. Calling Sequence 
CALL RDDIR (ID* lERR) 

b. Argiiments 


Parameter 

Dimension Type 

In/Out 

Description 

ID 

1*2 

In 

Current segment number. 

lERR 

1*2 

Out 

Error status of Directory 


File read. 


c. Description 

Upon entry* this subroutine reads the specified Directory File 
entry. If during the read an error condition was setected* the 







appropriate error message is output to the printer 


3.5.1. 2. 8. 12 RDDOT 

The purpose of this subroutine is to read the direct access DOT 
DATA File for the segment currently being processed. 

a. Calling Sequence 
CALL RDDOT (ID, lERR) 

b. Argurments 


Parameter 

Dimension Type 

In/Out 

Description 


ID 

1*2 

In 

Current segment 

number 

lERR 

1*2 

Out 

Error status of 

Dot 




Data File read. 



c. Description 

Upon entry, this subroutine reads the specified Dot Data File in 

t 

its entirety. If during the read an error condition was detected, 
the appropriate error message is output to the printer. 

3.5.1.2.8.13 RDDODU 

The purpose of this subroutine is to read the DO/DU (Field) File 
for the segment ciurrently being processed. 

a. Calling Sequence 
CALL RDDODU (ID, lERR) 

b . Arguments 


Parameter 

Dimension Type 

In/Out 

Description 


ID 

1*2 

In 

Current Segment 

number. 

lERR 

1*2 

Out 

Error status of 

Field 


File read. 


c . Description 



Upon entry, this sxibroutlne reads the specified DO/DU (Field) 

Pile in its entirety. If during the read an error condition was 
detected, the appropriate error message is output to the printer. 

3.5.1.2.8.14 UPDOT 

The purpose of this subroutine is to update the Dot Data File 
when a Field File is created, updated or deleted. 


a. Calling Sequence 
CALL UPDOT (lOPT) 




b. Arguments 

Parameter Dimension 

Type 

In/Out 

Description 

lOPT 

1*2 

In 

l«Segment deleted 
2eNormal entry 


c. Description 


Upon entry, the current label for each dot is saved in temporary 
storage* The 'X* and 'Y* coordinates of all vertices are unpacked 
and saved in temporary storage. Dots falling within fields of 
the segment are labelled accordingly (FL6D0T) and the remaining 
labels restored. 

3.5.1.2.8.15 KOHBRT 

The purpose of this function is to compare the substrings of A and 
B according to the collating sequence of the hardware (PDP 11/45) . 

a. Calling Sequence 
I*KOMBRT (A, C, N, B, J) 

b. Arguments 

Parameter Dimension Type In/Out Description 

A A(l) In Name of buffer #1 to be 

compared. 




Parameter 

Dimension 

Type 

In/Out 

Description 

C 


L*1 

In 

Starting position in 
buffer for conq>arison. 

N 


L*1 

In 

Length of string in 
comparison. 

B 

B(l) 


In 

Name of buffer #2 to be 
ccxnpared. 

J 


L*1 

In 

Starting position in 
buffer for comparison. 


This function con^ares two strings according to collating sequence. 
Neither string is changed. If they are not the same lengthy the 
short one is assumed to be filled with blanks. 

3.5.1.2.8.16 EXPTD 

The purpose of this subroutine is write messages to the printer 
according to the type of card expected but not found. 

a. Calling Sequence 
CALL EXPTD (I) 

b. Arguments 

Parameter Dimension Type In/Out Description 

I 1*2 In Value indicating type 

of card expected. 

c. Description 

Upon entry, the type of card expected (I) is tested and, depending 
on the value of 'I* , the appropriate message is output to the 
printer. 




3.5.1.2.8.17 DCOOBD 

The purpose of this subroutine is to decode coordinate data as 
read from Del Poster cards. 


Calling Sequence 

CALL DCOORD <1BUF, INX, IXY, 

lERR) 


Arguments 

Parameter 

Dimension 

Type 

In/Out 

Description 

IBUF 

IBUF(l) 


In 

Contains data to be 
decoded. 

INX 


1*2 

In 

Index vertice array 
(number of coordinates) 

IXY 


1*2 

In 

le^ ixel 
2-line 

lERR 


1*2 

Out 

Error status of coordi- 
nate processing. 


c . Description 

Upon entry, this subroutine checks to insure the maximum number 
of vertices has not been exceeded. All syntactically legal 
coordinates are decoded and stored in the vertex array. For all 
erroneous coordinate values, the error indicator is set and an 
appropriate error message is output. 

3.5.1.2.8.18 JULIAN 

The purpose of this subroutine is to correct the current Gregorian 
date to the current Julian date. 

a. Calling Sequence 

CALL JULIAN (YR, MO, DY, JULIO) 





b. Arguments 


Parameter 

Dimension Type 

In/Out 

Description 

YR 

1*2 

In 

Gregorian year 

MO 

1*2 

In 

Gregorian month 

DY 

1*2 

In 

Gregorian day 

JULIO 

1*2 

Out 

Julian date (1-365) 


c. Description 

This subroutine generates the current Julian date in the following 
manner. 

e Add current day to total number of days (by month) passed this 
year. 

e Determine if ^is is a leap year or not. 
e If not a leap year, subtract one day. 


3. S. 1.2. 8. 19 WRDIR 


The purpose of this subroutine is to write the direct access 
Directory File entry for the segment currently being processed- 

a. Calling Sequence 
CALL HRDIR (ID, lERR) 

b. Arguments 

Parameter Dimension Type In/Out 
ID 1*2 In 

lERR 1*2 Out 


Description 

Current segment number. 

Error Status of Directory 
File write. 


c . Description 


Upon entry, this subroutine writes the specified Directory File 
entry. If during the write and error condition was deleted, the 



appropriate error message is output to the printer 


3.5.1.2.8.20 WSDODU 

The purpose of this subroutine is to write the DO/DU (Field) 
File for the segment currently being processed. 


a. Calling Sequence 
CALL WRDODU (ID, lERR) 

b. Arguments 

Parameter Dimension Type 
ID 1*2 

lERR 1*2 

c. Description 


In/Out Description 

In Current segment number. 

Out Erxor status of Field 

File write. 


Upon entry/ this subroutine writes the specified DO/DU (Field) 
File in its entirety. If during the write an error condition 
is detected/ the appropriate error message is output to the 
printer. 


3.5.1.2.8.21 WRDOT 


The purpose of thii; subroutine is to write the direct acces Dot 
Data File for the segment currently being processed. 

a. Calling Sequence 

CALL WRDOT (ID/ lERR) 


b. Arguments 

Parfuneter Dimension Type In/Out 


ID 

1*2 

In 

lERR 

1*2 

Out 


Description 

Current segment number. 

Error status of Dot Data 
File write. 
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c 


Description 


upon ontry* this subroutino mritot the epeoified Dot Data Pile 
in its entirety. Z£ during the write an error condition is 
detected# the appropriate error massage is output to the printer. 





3 *5. 1.3 Dot Data Updaf /Gnaratlon (DOTUPD 


ocunentea by Don Loo 


3. 5. 1.3.1 Linkagos 

a. FORTRAN 

1. ASSIGN 

2. CLOS$ 

3. OPENS 

4 . IDATE 

b. Shared aubroutines and utilities 

1. DSET 

2. DSKCHK 

3 . ELAPSE 

4 . ERRMES 

5. PSTVID 

6. FSTVID 

7. HVPY 

8 . LECTAP 

9. RREAD 

10 . SUBSTR 



Private subroutines 


1. DIRLOD 

2. DIRUPD 

3. OPMESS 

4. RDCARD 

5. SKIP 

6 . UNPAK 

7 . UPDATE 

8 . CATLOG 

9. JULIAN 

10. ALLWPD 

11. CARDIN 

12 . COMPAR 


9 ? 












3.5.1.3.2 IntarfaoM Bxtaraal Intarfaeat 

a. Coomion Kama CMiSPMUtfl.XNC 

This common nano la usad aa input only for paranatara MlkXCIkT, 

MAXCHM, NPIX, NLIM, MOOTS, DL8XIP and D8SKIP. 

b. working fila namaa 

1. FOROOI.DAT 

2. DIRPILE.DAT 

3. XXXXDOTS.DAT 

3. 5. 1.3. 3 Inputa 

a. Update card deck - aae appendix 

b. Dot data file 

3. 5. 1.3. 4 Outputa 

a. Reporta - a printer liating of the update card deck. 

b. Diagnoatica 

1. Proceaaing on aegment 'XXXX* will be diacontinued— -Proc- 
eaaing will continue with a new aegment or halt with an 
E.O.P. 

2. ERROR— —Only one TYPEl value allowed (Error meaaage #1 
ia then printed) 

3. ERROR— >Only one START value allowed (error meaaage fl 
ia then printed) 

4. Error on atart card- — Value leaa than 1 or greater 
than 60 (meaaage #1 ia then printed) 

5. Improper aequence or improper data or column miaalignnent 
on the following card. (The card ia printed and then 
meaaage II ia printed.) 



3. 5.1. 3 .5 Storage Requirements 
DOTUPO occupies 54 blocks. 

3. 5. 1.3. 6 Description 

The Dot data update program executes in a batch mode and processes 
the batch update of the XABEL (analyst) and the type fields. 

It processes a deck with the following parameters t 

a. A control card with segment number. 

b. A Type 1 value 

c. A start value 

d. A data deck with the option to include a Type 1 value and/or 
a label value. 

3. 5. 1.3. 7 Plow Charts 
See figure 3-6. 

3. 5. 1.3. 8 Subroutines 
3. 5. 1.3. 8.1 DIRLOD(PTR) 

a. Calling sequence 
CALL DIRLOD(PTR) 

Parameter Dimension 

PTR (1) 

PTR - a pointer to the proper record located in the directory 
file. 

b. Description 

This subroutine reads a record from the directory file and 
selects from this record the category names. These names are 
then stored into the 'CATNAM* array. 


Type In/Out 

Integer In 


/«?/’ 
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3*5.1. 3*8.2 Subroutine DIRUPD 


a. CALL DIRUPD (START, TYPED 

Parameter Dimension Type In/Out 

START (1) Integer In 

TYPEl (1) Integer In 

START - the START value read from cards 
TYPE 1 - The TYPEl value read from cards 

b . Description 

This subroutine updates a directory file record (see above) with 
the Julian day, year, START value, and the TYPEl value. The 
record is then written back to the directory file. 

3. 5. 1.3. 8. 3 OPMESS 

a. Calling sequence 
CALL OPMESS (DISKNM) 

Parameter Dimension Type In/Out 
DISKNM (1) Integer In 

DISKNM - Disk number of the disk to be mounted. 

b. Description 

Prints the following message to the decwriter: 

THE NEXT SEMENTS TO BE PROCESSED WILL BE FOUND ON DISK 

NUMBER , IF YOU WISH TO CONTINUE, PLEASE MOUNT DISK NUMBER 

NUMBER , THEN TYPE THE LETTER (C) . IP YOU WISH TO ABORT 

THIS JOB THEN TYPE IN THE LETTER (X) THANK YOU. 

3. 5. 1.3. 8. 4 FUNCTION RDCARD 

a. Calling sequence 
RDCARD (CARD) 




W P PWj l .MMWJM fl 




Type In/Out 

Integer Out 

b. Description 

1. Checks status on card read 

a. IF STATUS « 1 - continue processing 

IF STATUS « 2 > Set function equal to 5 and return 
IF STATUS B 3 » Set function equal to 6 and return 

2. Identifies the card read as one of the following - 
SEGMENT TYPEl, START, DOT. 

3. 5. 1.3. 8. 5 SKIP 

a. Calling sequence 
CALL SKIP 

b. Description 
Skips to next segment card. 

3. 5. 1.3. 8. 6 UNPAK 

a. Calling sequence 
CALL UNPAK (CARD,D0TFLG,TYP1) 

Parameter Dimension Type 

CARD (40) Integer 

DOTFLG (1) Integer 

CARD - an array containing ’DOT* information. 

DOTFLG - a flag indicating first card to be processed. 

b. Description 

Unpacks a 'DOT* card, i.e., obtains the following values: 
1. TYPEl, START, and all dot numbers on any one card. 


In/Out 

Out 

In 


Parameter Dimension 
CARD (40) 



3. 5. 1.3. 8. 7 UPDATE 


a. Call sequence 

CALL UPDATE (TYP1,INIT) 

Parameter Dimension Type In/Out 

TYPl (1) Integer In 

IMIT (1) Integer In 

TYPl - same as TYPEl 

INIT - if equal to a "c" then a complete update will be 
performed. 

If equal to a zero, a partial update will be performed. 

b. Description 

1. Reads the DOT DATA file into a work array 

2. Calls on *ALLUPD* to update the work array 

3. Writes the updated work array back to the DOT DATA file. 

3.5.1. 3.8.8 CATLOG 

a. Call sequence 

CALL CATLOG (LABEL, LABNUM) 


Parameter 

Dimension 

Type 

In/Out 

LABEL 

(1) 

Integer 

In 

LABNUM 

(1) 

Integer 

Out 


LABEL - an alpha character (s) denoting a classification by 
an A. I. 

LABNUM *- a number indicating the position the LABEL has in 
the 'CATNAM' array. 

b. Description 

Search through the 'CATNAM* array to determine the position 
of the input alpha LABEL. 



3.5.I.3.8.9.8 JULIAN 

a. Calling sequence 

CALL JULIAN (MO,DAY,YR) 


Parameter 

Dimension 

Type 

In/Out 

NO 

(1) 

Integer 

In 

DAY 

(1) 

Integer 

In 

YR 

(1) 

Integer 

In 

MO - month 
DAY - day 
YR - year 

b. Description 

Calculates the Julian 

date 


3.5.1.3.8.9.10 ALLUPD 

a. Calling sequence 

CALL ALLUPD (WORK, TYPl 

, INIT) 


Parameter 

Dimension 

Type 

In/Out 

WORK 

(2,209) 

Integer 

Input and Output 

TYPl 

(1) 

Integer 

In 

INIT 

(1) 

Integer 

In 


WORK - the DOT DATA array to be updated 
TYPl - same or TYPEl 

INIT - a flag to indicate complete or partial update 
b. Description 

Update the TYPE and label values in a DOT DATA record with 
the following conditions: 

1. If a complete update is needed, all values of TYPE and 
LABEL are set to zero before any updates are made. 


— 

/^»r 




2. If a partial update Is needed » then only those TYPE and 
LABEL values indicated on the card deck are changed. 

3.5.1.3.8.10 CARDIN 

a. Calling sequence 
CALL CARDIN (CARD) 

Parameter Dimension Type In/Out 
CARD (40) Integer Out 

CARD ■> an array to hold one card image 

b. Description 
Read a card. 


3>wr5 

^ 0 ^ 
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3. 5.1. 4 CAMS/CAS Interface - Cluatar Statistics (B8 
and Documented by A. Holley) 


iramroed 


The purpose of this program is to read the CAMS/CAS Interface 
Tape, extract classification results and cluster statistics for 
the given segment, and save this data on the data base disk. 

3. 5. 1.4.1 Linkages 

A. IMALB 
NONE 

B. POM^RAN (or system) 

CLOSE, OPEN, DATE, SECONDS, TIME, ASNLUN, GETADR, QIO, 
WAITER 

C. Shared siibroutines and utilities 
DSKCHK 

KAUTH 


D. Private subroutines 
CORED 


3. 5. 1.4. 2 Interfaces 
A. Common Name COMl 


Parameter 

ACDATE 

CHNVEC 

NOCHAN 

NOSUB 

SUBCAT 

SUBPOP 

CATKNT 


Updated by 
Subroutine 

BSTAT 

BSTAT 

BSTAT 

BSTAT 

BSTAT 

BSTAT 

BSTAT 


Referenced by 
Subroutine 


ycf 


CATTH 

BSTAT 


NODO 

BSTAT 


MODU 

BSTAT 


NOTH 

BSTAT 


Common Name 

COM2 



Updated by 

Referenced by 

Parameter 

Subroutine 

Subroutine 

TDATE3 

BSTAT 


NOCAT 

BSTAT 

BSTAT 

CATNAM 

BSTAT 

BSTAT 

Common Name 

COM5 


DISKID 


BSTAT 


DSKCHK 

D. Data Base File Neumes 

SYO: [300,300] DIRPILE.DAT 
DB2: [300,300] XXXXTSTAT.DAT 

(XXXX is a four digit segment number) 

3. 5. 1.4. 3 Inputs 

A. The CAMS/CAS Interface tape format specification is in Earth 
Resources Data Format Control Book (PHO-TR543 Rev. A, Change 3) 

B. The program reads two input cards. The first card gives the 
input tape device code in column 1 - An M or X. The second 
card, also in column 1, has the unit number > 0 or 1. 

3 . 5 . 1 . 4 . 4 Outputs 

A. The program outputs the C7VMS I-lOO Data Base Transaction 
Report, listing segments and a processing summary. 



B. DIAGNOSTICS t 

CARD ERROR - this Indicates the absaaoa of tho raquirsd inimts 
on the input cards. I/O STATUS BLOCK ERROR CODE. This 
indicates a fatal tape error condition (not a parity error) . 

TAPE ERRORS ENCOUNTERED « . This informational message is 

given at the end of processing and indicates that one or more 
tape parity errors vrere encountered. 

3.5.1.4.5 

BSTAT occupies 77 blocks. 




3. 5,1. 4*6 B8TAT D^toription 

Th« CAM8/CA8 statlstleal file build program oparataa in a batch 
mode* The first action of the progr«n it to output the proeassing 
summary header. 

8ubroutine CORED is called to initialise tape operations. CORED 
reads two input cards defining the tape device code and unit 
number. The program reads to a recognition segment record and 
obtains the segment number. DSXCRK is called to see if the seg- 
ment is associated with the current disk. If not# a message is 
written for the processing summary report# and the program reads 
to the next recognition segment record on tape. If the segment 
is to be processed# the directory file is opened and a file record 
is read into cemimon area COMl. Common variables are decoded. 

The program processes subclass related classification results# 
accumulating pixel counts by category. The program then reads 
the first statistics record for the segment. 8tatistics for each 
subclass are decoded# a division is perfonned according to the 
ing>lied decimal point# and the data is stored in an array in the 
order in which the statistics data sets appear on the tape. 
Finally# the statistics file is opened. The first record «rritten 
to the file is the COMl common block. This is followed by means# 
standard deviations# greenness calculations# for each subclass# 
in groups of four channels. One record is written for each sub- 
class or cluster. 

The process is repeated for each segment on the tape# until the 
program reads the second end of file mark. 

3. 5. 1.4. 7 Flowchart 

Figure 3-7. (For detailed flowchart see Volume 2). 








3. 5. 1.4. 8 Sttbroutiif CORED 


0)RBD handlcit tap« eparatlons for B8TAT. 
• Calling saquanea 

Call CD«BD (IBOP,R,PILB) 


Arguments 

Parameter 

Dimension 

Type 

In/Out 

Description 

IBUP 

800 

BYTE 

In 

Input buffer 

R 


I 

In 

Control variable 

Pile 


I 

Out 

BOP count 


a Daacription 

If tha argument R la 0, CORED raada a card input from Unit 1. 

If the first colxmm of tha card is not 'N* or 'X', defining the 
tape device code» tha program writes 'CARD ERROR* to tha line 
printer and stops. CORED reads a second card. If a *0* or *1* 
does not appear in Column 1 , defining unit number « tha same action 
is taken. The system subroutine A8NLUN is called to assign the 
unit number. The program calls GETADR to get the input buffer 
address set up in the XPRN array. The system routine QZO is 
called with a tape rewind function code. Next QIO is called with 
a read function code. If the read is successful the program 
returns. If an BOP was encountered, PILE is increased by 1. If 
an error code of -4 (parity) is indicated, an error count is 
incremented before a return is made. For an error code other 
than -4, the program prints a message and stops. 

If, on entering the r*ibroutine, R is greater than 0, the above 
logic is executed beginning with the read call to QIO. 

On entering with a negative R, the subroutine does a rewind call 
to QIO. At this point the parity error count is checked. If the 
count is positive, a message is printed before returning to the 
main program. 


/// 


3*S.1.5 Cla»alflc>tion/Cltt«ter Map Tap»« {PTOM) (ProQrftwn^d 
ana aocunanf a by pon Loa) 

3.S.I.S.1 Linlcagaa 

a. FORTRAN 

1. BRRSET 

2. SBCNDS 

3. CLOS$ 

4. OPBN$ 

5. DATE 

6. TIME 

b. Shared subroutines and utilities 

1. DSET 

2. DSKCHX 

3. ELAPSE 

4 . ERRMES 

5. FSTVID 

6. HPROS 

7. HVPy 
e. LECTAP 

9. RREAD 

10. SUBSTR 

11. LREED 

c . Private subroutines 

1. DIRUPD 

2. FADE 

3. FMAINT 

4 . HEAOIN 

5. MAPUPD 

6. REPORT 

7 . OPMESS 

8. LREED 



3.5.1.5.2 Interfaces 

a. External interface 

1. Common Name CAMSPARAM.INC 

This common name is used as input only for parameters 
NAXCHN,NPIX ,NLIN,NDOT . 

2. Working file names t 

TCLUNM.MAP 

TCLANM.MAP 

TSTAT.DAT 

DIRFILE.DAT 

3*S*1«3«3 Inputs 

The inputs to this program are: 

a. DTRM Tape from ERIPS containing 

1. Classification map reflecting category level color codes 

2. The unconditional cluster map reflecting individual 
clusters with unique color codes. 

3. 5. 1.5. 4 Outputs 

The outputs from this program are: 

a. Updated temporary classification map and cluster map 

b. Updated system directory 

c. Updated system index file 

d. Classification/cluster map update report 

e. Appropriate error messages. 

3. 5. 1.5. 5 Storage Requirements 
OTERM occupies 108 blocks. 




3. 5. 1.5. 6 Description 

The classification/cluster map build program executes in an off 
line mode and processes the universal formatted data from the 
DTRM tape. To build these files, the DTRM tape is read, specific 
flags are checked and the indicated classification/cluster maps 
are transferred to the appropriate data bare disk pack. Upon 
completion of the transfer, the Index Pile will be updated or 
required. 


3 . 5 . 1 . 5 . 7 Flow Chart 
See Figure 3-8. 


3. 5. 1.5. 8 Subroutines 
3. 5. 1.5. 8.1 DIRUPD 
a. Calling sequence 


CALL DIRUPD 

(YR, JULDAT, 

ID, PTR) 


Parameter 

Dimension 

Type 

In/Out 

YR 

(1) 

Integer 

In 

JULDAT 

(1) 

Integer 

In 

ID 

(1) 

Integer 

In 

PTR 

(1) 

Integer 

In 

YR - year 




JULDAT - Julian date 




ID - flag to indicate classification or cluster 
PTR - pointer to records in the directory file 

b. Description 

Reads the appropriate record from Directory File, retrieve 
the category names, updates the record with new dates and 
writes the update record back to the Directory File. 




OTRN TAPE READ AMD BUILD 



Figure 3-8 
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3. 5. 1.5. 8. 2 FADE 

a. Calling sequence 
CALL FADE 

b. Description 

Closes all files opened by the subroutine FMAINT. 

3. 5. 1.5. 8. 3 FMAINT 
a. Calling sequence 


CALL FMAINT (SE6NUM,NPIX4,NLIN, ERROR) 


Parameter 

Dimension 

Type 

In/Out 

SE6NUM 

(1) 

Integer 

In 

NPIX4 

(1) 

Integer 

In 

NLIN 

(1) 

Integer 

In 

ERROR 

(1) 

Integer 

In 


SE6NUM - segment number 
NPIX4 - record size in double words 
NLIN - maximum number of records 
ERROR > error flag 

b. Description 

Opens the following files using the appropriate segment 
number: 

1. TCLUNM.MAP 

2. TCLANM.MAP 

3. TSTAT.DAT 

3. 5. 1.5. 8. 4 HEADIN 

a. Calling sequence 

CALL HEADIN (ID^SEGNUM, JULDAT,YR,EOF) 


//f 


F 







?■ 




Parameter 

Dimension 

Type 

In/Out 

ID 

(1) 

Integer 

Out 

SBGMUM 

(1) 

Integer 

Out 

JULDAT 

(1) 

Integer 

Out 

YR 

(1) 

Integer 

Out 

EOF 

(1) 

Integer 

Out 


ID - flag indicating classification or cluster 
SEGNDM - segment number 
JULDAT - Julian date 
YR - year 

EOF - end of file flag 
b. Description 

Reads the Universal formatted DTRM tape, and fr<mn the header 
portion, selects the above indicated parameters. 

3. 5. 1.5. 8. 5 MAPUPD 

a. Calling sequence 
CALL MAPUPD (ID) 

Parameter Dimension Type In/Out 
ID (1) Integer In 

ID - a flag indicating classification or cluster 

b. Description 

Reads the data records from the Universal formatted DTRM 
tape. Based on the ID flag, classification or cluster data 
will be retrived and converted to cluster number values or cate- 
gory position values. 
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3.5.1. 5. 8. 6 REPORT 
a. Calling aaguanoa 

CELL REPORT (AZ0,A8BG,AD8K,A¥R,AJUL,Fn.N0M) 


Parameter 

Dimension 

Type 

In/Out 

AID 

(30) 

Integer 

In 

ASEG 

(30) 

Integer 

In 

ADSK 

(30) 

Integer 

In 

AYR 

(30) 

Integer 

In 

AJDL 

(30) 

Integer 

In 

FILNUM 

(d) 

Integer 

In 

AID - all 

ID numbers 



ASEG - all segment numbers 


ADSK - all disk numbers pertaining 

to segments 

AYR - all 

year dates 




AJUL - all Julian dates 
FILNUM > number of files processed 

b. Description 

When 'DTERM* has processed all data files, a report is gen- 
erated to the line printer using the above parameters. 

3. 5. 1.5. 8. 6 OPMESS 

a. Calling sequence 
CALL OPMESS (DISKMM) 

b . Arguments 

Parameter Dimension 

DISKNM (1) 

DISKMM 

DISKNM - The number of 


Type In/Out 

Integer In 

the next disk to be mounted. 




Description 

Prints the following message to the decwrlters 

THE NEXT SEGMENTS TO BE PROCESSED WILL BE FOUND ON DISK 

NUMBER } IF YOU WISH TO CONTINUE, PLEASE MOUNT DISK 

NUMBER ; THEN TYPE THE LETTER (C) . IP YOU WISH TO ABORT 

THIS JOB, THEN TYPE IN THE LETTER (X) THANK YOU. 



3.5. 1.6 Seqmftnt Deltf (8BGDBL) (Programmed and docuroanted bv 
Ken galilebn — 

This non menu, interactive program accepts a segment nuiriber as 
input, validates the segment number, emd for each valid segment 
number deletes all associated files on the Pennanent Data Base 
Disk (DB2 1 ) . The user may delete as many segment associated 
files as he wishes. 


3. 5. 1.6.1 Linkages 

a. IMALIB 

b. FORTRAN 

c. Shared Subroutines 

1 . ELAPSE 

2. OSKCHK 

d. Private Subroutines 
1. SUBSTR 


3. 5. 1.6. 2 Interfaces 

a. Data base names 

1. DSKTBL.DAT 

2. DIRFILE.DAT 

3. 5. 1.6. 3 Inputs 

a. Key-In 

1. KEVIN to (D)ELETE ANOTHER SEGMENT 

2. PLEASE MOUNT DISK PACK NO. XXXX 

3. DO YOU WISH TO (C)ONTINUE 

4. INPUT SEGMENT NUMBER 

3. 5. 1.6. 4 Outputs 

a. Reports 

1. Segment Delete CAMS l-lOO Data Base Transaction 
Report (Reference User's Manual for contents) 

b. Diagnostics 



1. WRONG DISK PACK MOUI^BD - Mount correct 
dispatch and rerun the job 

2. SEGMENT NUMBER NOT ON DATA BASE - Input 
another segn^nt nuniber 

3. 5. 1.6. 5 Storage Requlrenients 
SEGDEL occupies 45 blocks. 

3. 5. 1.6. 6 Description 

The Segment Delete program accepts a segment number as input. 
For every valid segment number the following associated files 
are deleted: 
e Dot Data File 

e The imagery data associated with each acquisition 

• Fields File (if present) 

• Temporary Statistics File (if present) 

• Permanent Statistics File (if present) 

• Temporary Classification Map (if present) 
e Permanent Classification Map (if present) 
e Temporary Cluster Map (if present) 

e Permanent Cluster Map (if present) 
e Directory Pile (specific entry only) 
e Disk Index File (specific entry only) 

When the associated data base files have been deleted and the 
system files updated additional segments may be deleted or the 
job may be terminated at will. 

3. 5. 1.6. 7 Flowchart 
See Figure 3-9. 


3. 5. 1.6. 8 Subroutine SUBSTR 

To move a substring of A into a substring of B 



• Calling Sequence 


CALL 8UB8TR 

(A,I,N,B,J,N) 



Arguments 

Parameter 

Dimension 

TjQge 

In/Out 

Description 

A 

A(l) 


IN 

String name containing 
data to be moved 

I 


1*2 

IN 

Starting position 

N 


1*2 

IN 

Length 

B 

B(l) 


OUT 

Receiving string name 

J 


1*2 

OUT 

Starting position 

M 


1*2 

OUT 

Length 


e Description 

The contents of string name 'A' starting at 'I* for *N' characters 
is moved to string name 'B* steurting at 'J* for *M* characters. 

If string *B* is shorter than string 'AS characters on the 
right will be truncated. If string 'B* is longer, it will be 
blaiik filled on the right. 
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Figure 3-9,- Seonjent Delete. 
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3.5.2 INTERACTIVE ANALYSIS 


The programs in this section are the programs with which the analyst 
must interact. He is prompted for inputs by menus and queries 
appearing on the Tektronix terminal. Brief reports needed for 
interactive decision making are output to the terminal screen r 
where hard copies may be made if desired. More lengthy reports 
are output to the Gould printer or line printer at the user's 
request . 

Communication between these programs is accomplished through a 
core resident 'common* areu ind working files. The global common 
blocks are defined in section 3.4. The working files are defined 
in section 3.4 also. 

The global common area and the working files are initialised from 
the data base at Uie time the analyst begins analysis for a 
specific segment. The interactive analysis procedures carried 
out by the analyst may change the content of the common area and 
working files repeatedly before results are satisfactory. The 
decision to pennanently update the data base with the new results 
must be made by the analyst. He must activate the program which 
accomplishes this function. 

To protect against system crashes and provide a restart capability# 
the global ccxnmon area is preserved on a disk file at the com* 
pletion of each execution for each major program module. In the 
event of a system crash, the analyst must indicate that he is 
restarting when he signs on again; then he must reactivate the 
program module which was in use when the system went down. 

Except for a description of the control program (Section 3. 5. 2.1) 
the remainder of this section is organized according to the first 
menu the analyst will see when he has activated the CAMS/I-100 
system. (See Figure 3*10) 





Piqure 3-10.- Control Displays. 
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3. 5. 2.1 Storage CAM8/I-100 Control Program (CAM8BX) (Proorammad 
and documented bv Etbvl Highto^r) 

This program controls the program execution In response to the 
c.nalyst's requests during the Interactive Imagery analysis. 

The progreun Is Installed as TASK «... CAM. 

3. 5. 2. 1.1 Linkages 

A. IMALIB - routines used FRONT, INTFF, OUTPUT 

B. Syst v ^a routines used CLREF, REQUES, NAITFR. 

C. Shared subroutines - ELAPSE 

D. Executable tasks using system event flag 50 for communication. 
INIT, FULOI3, FLDDEF, DOTOVR, SCPLOT, DOTPRO, ACLLAP, CLUDIS, 
RECPRO, DOTRPT, BIASCR, CLURPT, FLDRPT, PRMUPD. 

3 . 5 . 2 . 1 . 2 Interfaces 

This program communicates with other programs through the global 
common area (see Appendix B for details and system event flag 50. 

3. 5. 2. 1.3 Inputs 

Inputs to this program are options requested by the analyst 
through keyboard to initiate the desired imagery analysis capa- 
bility. 


3. 5. 2. 1.4 Outputs 
DIAGNOSTICS 

('$?') - User select a number less than 10 in the CONTROL 
PROGRAM menu 

( ' INVALID OPTION ' ) - If any number is selected under DOT PROCESSING 
which is greater than 3 an error message is printed. 
('INVALID OPTION') - If any number is selected under REPORT 
which is greater than 4 an error message is printed. 


m 


3. 5. 2. 1.5 Storage Requirements 
CAMSEX occupies 28 blocks. 


3. 5. 2. 1.6 Description 

The CAMS/I-100 control program is loaded into core immediately 
after the analyst signs on to the system, and remains in core 
until the end of one interactive imagery analysis session. After 
being loaded to core, the control program displays all functional 
capabilities in the form of options and waits for the analyst to 
input the option number from the keyboard. After the analyst 
keys in the desired option number, it activates the corresponding 
program and waits for program completion. 

For the purpose of program communication, a system event flag is 
used as an indicator and is set to *0* by the control program 
prior to activating the requested program, and to *1* by the 
activated program when ready to return. As soon as the control 
program resumes from the wait state, it repeats the above process 
and waits for further input from the analyst. 

3. 5. 2. 1.7 Flowchart 
See Figure 3-11. 

3. 5. 2. 1.8 Subroutines 
None 











3. 5*2. 2 Initiate Se^ent Analysis (miT) ( Prograamted and 
aocumeniefl pv 6ene i^ilaon) ■ 

3. 5. 2. 2.1 Linkages 

A. IMALIB 

1. FRONT 

2. IBYTE 

B. FORTRAN (OR SYSTEM) 

1. CLOS$ 

2. OPEN$ 

3. SETEF 

4. $MAXO 

5. $MINO 

C. SHARED SUBROUTINES AND OUTLINES 

1. CSGDPH 

2. DSKCHK 

3. ELAPSE 

D. PRIVATE SUBROUTINES 

1 . FTRNFR 

2. INTLZE 

E. TASK OVERLAY LINKS 
NONE 


3. 5. 2. 2. 2 Interfaces 

EXTERNAL 

A. FILES 

1. 'DBO:[300,l]CLASSMAP.TMP7l* 

2. •DBO:[300,1]CLUSTERMP.TMP;1* 

3. •DB2sC300,300]XXXXTCLAS.MAP* 

4. 'DB2:[300,300]XXXXPCLAS,MAP' 

5. •DB2:[300,300]XXXXTCLUS.MAP* 

6. •DB2:[300,300]XXXXPCLUS.MAP’ 

7. 'DB2: [300, 3003XXXXTSTAT.DAT’ 

8. *DB2:[ 300, 3001xXXXPSTAT.DAT* 

9. *DB2:[ 300, 3001XXXXFIELD.DAT' 


/SJf 


10. *DB2t[300, 300lXXXXDDOTS.DAT* 

11. 'DBO;[300,1]DOTS.TMP:1' 

12. *DBOt[300,l]FIELDS.TNP;l' 

13. '[300,1]DOTGXY.TMP;1» 

14. '[300,1]SCATXY.TMP;1' 

15. 'DBO:[300,l]STATPIL.TMPjl* 

16. 'DBOtCSOO^llCLUSTATS.TMP;!* 

17. 'DBO: [300, 3003dIRPILE.DAT' 

18. 'DBO:[300,1]GLOBAL.TMP;1' 

WHERE XXXX > SEGMENT NUMBER 

B. COMl, COM2, COM3, COM4, AND CAMS ARE ALL COMPLETELY OUTPUT. 

3. 5. 2. 2. 3 Inputs 

KEYIN (REFERENCE USER'S MANUAL) 

3. 5. 2. 2. 4 Outputs 

A. Reports - segment report display 

B. Diagnostics 

1. Initiate segment analysis mode requested is other than 
N, R, or X; try again. 

Action: program loops back for another mode try. 

2. XXXX Illegal segment number — must be four Integers - 
try again (where XXXX is a KEYIN) 

Action: Program loops back for another segment number. 

3. Error encountered in transfer of temporary classification 
map. 

Action: Exit logic 

4. Permanent classification map does not exist. (Exit logic) 

5. Error encountered in transfer of permanent classification 
map. 

Action: Program loops back for another segment number. 


6. Error encountered in transfer of temporary oluster map. 
Exit logic. 

7. Permanent cluster map does not exist. Exit logic. 

8. Error encotintered in transfer of permanent cluster map. 
Exit logic. 

9. Error encountered in transfer of temporary statistics 
file (Record 1) . Exit logic. 

10. Error encountered in transfer of temporary statistics 
file. Exit logic. 

11. Permanent statistics file does not exist. Exit logic. 

12. Error encountered in transfer of permanent statistics 
file (Record 1) . Exit logic. 

13. Error encotinter in transfer of permanent statistics 
file. Exit logic. 

3. 5. 2. 2. 5 Storage 

INIT occupies 67 blocks. 

3. 5. 2. 2. 6 Description > same as before 

The initiate segment analysis program allows the analyst to 
initiate segment analysis under a variety of situations. 

After the analyst inputs the desired segment number, a segment 
summary report is displayed on the terminal to inform the analyst 
the latest segment working status. This report consists of the 
acquisition dates (up to 6) , previous computation results, 
existent DO/DU files, dot data file availability, classification 
and cluster map creation dates, etc. 

Having displayed the above report, the program then allows the 
analyst to select one of the following run modes to initiate 
segment analysis. Case 1 is the normal segment analysis initia- 
tion. It is designed for the analyst to perform normal segment 



analysis whenever it is due to the arrival of the new acquisition 
data or the reassurance of the previous work. This mode is the 
normal mode of operation. If the analyst selects this mode, the 
program will read in the acquisition date from the analyst and 
retrieve the desired portion of the data base to build the global 
common and create the temporary working files. 

Case 2 is the continuation from the previous segment analysis. 

It is designed to allow the analyst to continue the previous 
unfinished work in an orderly manner. If the analyst selects 
this mode, the program will read in the acquisition date from 
the analyst and retrieve the desired data from the temporary 
results save tape to restore the global common and the temporary 
working files. 

Case 3 is the restart from system crash. It is designed to help 
the analyst to recover from accidental system crash. If the 
analyst selects this mode, the program will read in the saved 
global common area from disk to restore the global common. Note 
that the global common is always saved to disk by all interactive 
imagery analysis programs during any imagery analysis session. 
However, there is no restore on the temporary working files (the 
cluster and classification maps) . It is the analyst's responsibility 
to ensure their validity. 

After the progreun completes the segment initialization, it exists. 

3. 5. 2. 2. 7 Functional Flow Chart 




See Frame 3-12 


3.5. 2. 2. 8 Subroutines 
A. Subroutine FTRMPR 

1. This subroutine transfers (loads) a file. 

2. Call FTRNFR (FXLBIN, FILEOT, NR, KRW, MR, FLAG) 

WHERE: FILEIN is input file name 

FZLEOT is output file name 
NR is number of records in the file 
KRW s length of each record 
NR - maximum number of records 


Subroutine INTLZB 

1. This subroutine initializes COMl 
values . 

2. Call INTLZB 


- C0M5 to zero or other 
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Figure 3-12.— Initiate Segment Analysis. 
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3«5.2.3 Image display (PUL0I3) (Proqrammad and docug»nt«d by 
T« Kell) " ' 

This program will read an image data file* apply user supplied 
transformations and write the data to the Image-100 refresh 
memory for CRT display. 

3.5.2. 3.1 Linkages 

A. IMALIB 

B. FORTRAN: F4P0TS 

C. SHARED SUBROUTINES: CSGDPH, DSLT, DUSET, FFFPI, BREAD, LIN, 

TCHLST 

D. PRIVATE SUBROUTINES: COMLUT, GABI, ZOOOOM 

E. TASK OVERLAY LINKS: FUL0I4 


3.5.2. 3.2 
Common name 

Parameter 

Interfaces 

FCOM 

Updated by 
Subroutine 

Referenced by 
Subroutine 

FILE 

* 

DSET 

WC 

TCHLST 

— 

MGL 

* 

— 

MGF 

* 

— 

LGL 

* 

— 

LGF 

* 

— 

HFL 

* 

— 

HFG 

♦ 

— 

CHL 

TCHLST 

— 

CHP 

TCHLST 

— 

MXC 

— 

— - 

NF 

* 

— 

Fll 

* 

DSET, DUSET, 1 

MTXTFG 

* 

DSET 

TUNIT 

* 

DSBT 

TUN 

••• 



3 ^ 

/(/ 


ParawtT 

FIN 

PORN 

TTXI 

TTYl 

TTX2 

TTV2 

IIXI 

IIYl 

IIX2 

IIY2 

IX 

lY 

TX 

TY 

MX 

NY 

NX 

NCMMC 

LGBC 

LUN 

GB 

LOT 

NCR 

RFAC 

X2 

YZ 


Updated by 
Subroutine 


ZOOOOM 


* 

COMLUT 

* 

ZOOOOM 

ZOOOOM 


Note: 1) * means main 

2) •* means none 

COMMON NAME HCOM 


Referenced by 
Subroutine 


DSET, HRBAD 
ZOOOOM 


ZOOOOM 


COMLUT 




Updated by 
Parameter Sidaroottne 

88 RP808 

8B 

IS 

LE 

MRPD8 

NDSPR 

NCPR 

ANCL 

NC 

NS 

NBIT 

DOI 

NCAR 

SUD 

RSIZ 

RSKIP 

HSIZ 

CALP >i' 

CBRR DSET, BREAD 


Referenced by 
Sytoroutine 

* 

* 

* 


BREAD, LRBED, FPIND 


* 


COMMON NAME COM2 
ISEG ? 
ADATES ? 


COMMON NAME COM4 
TXl * 

TYl 
TX2 
TY2 
IXl 
lYl 
1X2 


yxs ± — 


Updated by Referenced by 


Parameter 

Subroutine 

Subroutine 

IY2 

* 

? 

ACDISP 

* 

? 

III 

* 

? 

G 

it 

? 

B 

* 

? 


FILES 

FULOI.DAT 

DOTGXY.TMP 

3. 5. 2. 3. 3 Inputs 

A. NA 

B. NA 

C. KEY- IN (SEE USER'S MANUAL) 

D. NA 

The image data to be displayed for LACIE/CAMS will be a file 
resident in the data base and retrieved by user specified seg- 
ment number and acquisition date. This program will also accept 
image data on tape for the non-LACIE production user in one of 
the three formats: UNIVERSAL, ERTS, or LARSYS. 

Default conditions for tape and image coordinates, gains and 
biases and image file name will be maintained for LACIE but 
each default may be overridden by keyboard input. 

3. 5. 2. 3. 4 Outputs 

A . Reports 

Summary - See User's Manual 

B. Diagnostics 

1. "CATASTROPHIC ERROR NUMBER" 

Actions available - Restart or exit. 


m 


2. ZOOOON EBROR - BAD IMA6BRY/CRT POSITIONS 
Actions available - reenter scene corners. 

3. "CHANNEL NUMBER MUST BE POSITIVE." 

Actions available •* respecify gain/biases 

4. "CHANNEL « NOT IN IMAGERY" 

Actions available - ditto. 

5. "OPEN ERROR ON PILE PULOI.DAT" 

Actions available - restart or exit. 

C. Other 

Image on CRT 

In addition to the CRT display of the image, this program will 
output to a global communication area all parameters required 
by other programs to locate the image on the display and to 
apply transformations. 

3. 5. 2. 3. 5 Storage Requirements 

PUL013 occupies 97 blocks and FUL014 occupies 92 blocks. 

3. 5. 2. 3. 6 Description 

Program requests desired acquisition date, if LACIE defaults and 
if not, the Imagery /CRT positions, and gain bias locations/values. 
A summary is then given and if proceed is yes, PULOI4 is 
"REQUES"ted. When EF53 is set program asks restart of exit and 
responds appropriately . 

The image display program has the following capabilities: 

A. Input image data may be on tape or disk (i.e., from the 
data base) . 

B. The image may be in either UNIVERSAL, LARSYS or ERTS format. 






C. The tape and display coordinates (l.e., pixel and line 

nunA>ers) eure Input to the program, allowing the scene to be 
displayed anywhere on the screen, and to be blown-up or re- 
duced In size according to the analyst's desires. 

0. The following transformations may be applied to the data as 
It Is transferred from tape or disk file to refresh memory 
for Image display. 

z - G(y-b) 

where: z « the vector written to refresh memory (maximum 

dimension 5) 

G a gains supplied by the analyst or read from the 
header of a UNIVERSAL formatted image 

b » bias values supplied by the analyst or read 

from the header of a UNIVERSAL formatted Image 

y * Bx+c 

where: B = analyst supplied transfoirmation matrix of maxi- 

mum dimension 5 x 60 

X = raw data vector of maximum dimension 60 

c = analyst supplied bias vector of maximum dimension 5. 

If B and C are not input then y = x and x is limited to a 
dimension of 5. 


It is up to the analyst when using these transformations to 
ensure that the transformation itself scales the data to a 
0-255 range. The y » Bx+c transformation will be done in 
floating point. However, since y must be an 8-bit integer 
number, fractions will be truncated, negative numbers will 
be set to 0, and numbers greater than 255 will be set to 255. 




t ' 


B. There are five display channels on the Ima^-100. The fifth 
is normally reserved for theme track displays but it may 
also be used for video display. The amalyst may specify 
vdiich channel from his image file is to be vl«7ed on each 
channel of the display. 

Default conditions will be provided for each of these input 
parameters. 

3. 5. 2. 3. 7 Flowcharts 

This flowchart is presented in Figure 3.13. 

3. 5. 2. 3. 8 Subroutines 

3. 5. 2. 3. 8.1 COMLUT 

Compute gain bias lookup tables 
e Calling sequence 
CALL COMLUT 
e Arguments 
None 

e Description 
Computes 

LUT(J,I) » (LGBC(I,2)/100)*(J + LGBC(I,3)/100.) for I = 1 to 5 
J » 0 to 255 

Within limits of 0 to 255 on LUT 

3 . 5 . 2 . 3 . 8 . 2 GABI 

Accesses gains and biases from leader and converts from PCF 
Gain/biases to FULOI gain/biases, 
e Calling sequence 
CALL GABI 
e Arguments 
None 



















ORIGINAL PAGE IS 
OF POOR QUALITY 


Input 


Message 

#9 


Message 

#5 


Input 







• Description 

1. Gets PCF gains/biases from leader 
These are Y ■ A*X B 

2. Convert to FULOI gain/biases 
These are Y » A*(X-i*B) 

3. 5. 2. 3. 8. 3 ZOOOOM 

Converts scene/CRT corners to a set of "registration** look up 
tables . 

e Calling sequence 



CALL ZOOOOM (IXl,IYl, 
XZ,YZ,MX,MY,NX) 

1X2, IY2 

,TX1,TY1 

,TX2,TY2,IX,IY,TX 

Parameter Dimension 

Type 

In/Out 

Description 

IXl 

• 

1 

• 

I 

• 

I 

• 

Scene/CRT 

• 

• 

• 

TY2 

• 

• 

1 

• 

• 

I 

• 

• 

I 

• 

• 

Corners 

IX 

512 

I 

0 

PixelAine 

lY 

512 

I 

0 

Scene/CRT 

TX 

512 

I 

0 

Conversion 

TY 

512 

I 

0 

Tables 

XZ 

1 

R 

0 

X Zoom factor 

YZ 

1 

R 

0 

Y Zoom factor 

MX 

1 

I 

0 

CRT width 

MY 

1 

I 

0 

CRT length 

NX 

1 

I 

0 

Scene width 


This program generates four tables IX, lY, TX, TV such that i 
varies from 1 to MX. IX^ is the pixel on the CRT where imagery 
pixel TXj^ is to be placed. The same applies in the Y direction. 


3.5.2. 3.9 FUL0I4 

This task takas the parameters generated by PUL0I3 and places an 
imagery upon the CRT. 

3.5.2. 3.9.1 Linkages 


A. IMALIB 

B. F4POTS 

C. DSET, DUSET, FFIND, BREAD, LREED 

D. 6BCALC 

E. None 


3. 5. 2. 3. 9. 2 Interfaces 


See 3. 5. 2. 3. 2 


3 . 5 . 2 . 3 . 9 . 3 Inputs 

A. Tapes - none 

B. Cards - none 

C. Key-in - none 

D. Other - A. FULOI.DAT 

B. Imagery file 

3. 5. 2. 3. 9. 4 Outputs 

A. Reports - none 

B. Diagnostics - none 

C. Other - CRT display 

3 . 5 . 2 . 3 . 9 . 5 Storage Requirements 


3 . 5 . 2 . 3 . 9 . 6 Description 

For i from 1 to MY, the desired output channels are read for line 





the desired Input channels are read for line TY^. Then for 
j from 1 to MX, input pixels as specified in TXj are moved to 
output pixels IX j after being properly scaled. Then the output 
is written and i is incremented. 

3. 5. 2. 3. 9. 7 Flowchart 
Presented in Figure 3.13A. 

3 . 5 . 2 . 3 . 9 . 8 Subroutines 
3.5.2. 3. 9. 8.1 6BCALC 

This routine moves the imagery data and scales it for both the 
vector mode and the matrix mode (not used) . 


e Calling sequence 

CALL GBCALC (TP, IP, B, V, NX, NC) 


Parameter Dimension Type 

TP II 

IP II 

B (NX,NC) B 

V (512,5) B 

NX II 

NC II 


In/Out Description 

I TXi 

I IX^ 

I Data read from imagery 

file 

10 Data read from/to 

be written to CRT 

I See 3 . 5 . 2 . 3 . 8 . 3 

I Number of input imagery 

channels 


Pixel data B (TP,LGBC(I,1) ) is used as an index to the tables of 
3. 5. 2. 3. 8.1 and is stored in V(IP,I) for I from 1 to 5 where 
LGBC(I,4) is not zero or less than zero. 


/S2^ 


3.5. 2. 4 Field D»finition (PLDDBP) (ProoraBmad and PocuBfntad 
by (f, 

This task prints out the field file, displays fields from the 
field file, adds fields to the field file, and removes fields 
from the field file. 

3. 5. 2. 4.1 Linkages 


A. IMALIB 

B. FORTRAN: F4POTS 

C. SHARED: C86DPH,LIN 

D. PRIVATE: DELFLD,FLDRPT,FLGDOT 

E. OVERLAY: IRREG3 

3. 5. 2. 4. 2 Interfaces 

Common name C(M2 
Parameter Updated by 

EFLAG3 * 

UFLAG2 *,DELFLD 

Common name COM4 
Parameter Updated by 

DOLABEL * 

Working files 
IRRDBF.TMP 
FIELDS. TMP 

3 . 5 . 2 . 4 . 3 Inputs 

A. Tapes name 

B . Cards name 

C. Key>in - See User's Manual 

D. Other - IRRDBF.TMP - data returned from IRRBG3 


Referenced by 
DELFLD,FLDRPT 


Referenced by 


For field deletion, the analyst inputs the field nan» through 
tne keyboard. 

For field display, the analyst inputs the field name or the class 
label through the keyboard. 

For defining new fields, the analyst enters the field vertices 
(limited to 10 vertices) either through the keyboard or the 
cursor. 


3. 5. 2. 4. 4 Outputs 

A. Reports • See User's Manual 

B . Diagnostics 

1. FIELD DEFINITION FILE EMPTY - Asks restart or exit 

2. EXISTANCE FLAG FOR FILE "FIELDS. TMP” NOTSET CLEARLY NO 
FIELDS CAN BE DELETED. . . exits 

3. USER TYPED "X", GOOD DYE NO FIELDS DELETED exits 

4. NO FIELDS TO DELETE - exits 

C. Other IRRDEF.TMP, FIELDS. TMP 

For field deletion, the requested field data is deleted from a 
temporary file as read from the data base at segment initiali- 
zation. The dot DO/DU flags are updated similarly. For defining 
new fields, the temporary files are updated to reflect the 
inputed field data and the dot DO/DU flags. 

3 . 5 . 2 . 4 . 5 Storage Requirements 

FLODEF occupies 58 blocks. IRREG3 occupies 80 blocks. 


/S2T 


3. 5.2. 4. 6 DMorlption 

Program aaka if to report, diaplay, delate, or add filea. 

R^ort - program aaka output device, printa report, aaka reatart 
or exit. 

Diaplay - program aaka for a aelection of field (a) to diaplay 
aa well aa operational parametera, diaplaya it (them) and aaka 
if more filea to diaplay. 

Delete - program aaka for a aelection of field (a) to delete, 
aaka yea/no for each field before deleting it. 

Add - program aaxa for operational parametera then regueata up 
to 10 cornera via 

1 . Curaor 

2. TZ 

3. Pile 


3. 5. 2. 4. 7 Flowcharta 
Preaented in Figure 3-14. 

3. 5. 2. 4. 8 Subroutinea 

3. 5. 2. 4. 8.1 DBLFtD 

Delete fielda from ** FIELDS. TMP* 
e Calling aequence 
CALL DBLFLD(IO) 
e Argumenta 


3. 5. 2. 4. 8. 2 FLDRPT 

Print field report 
e Calling aequence 


4t V it^LmdL ^^Mir ^mJJ^ 















Default 


Messages 


1. (1) Field Report 

(2) Delete Fields 

(3) Display Fields 

(4) Define New Fields 
(x) EXIT 

2. REPORT DEVICE (T)ERMINAL, (G)OULD OR 
(DINE PRINTER > 

3. CURRENT FIELDS ARE 

(1) NAMEl (2) NAME2 (3) NAME3 (4) NAME4 

(5) NAMES (6) NAMES 

4. TYPE NUMERS OF FIELDS TO BE DELETED > 

5. DELETE FIELDS 

(N)NAMEN (M)NAMEM 

CONTINUE (Y)ES/(N)0 > 

6. USE LATEST IMAGE DISPLAY COORDINATES (Y)ES/(N)0 > 

7. COORDINATES FOR DATA BASE IMAGE > 


8. COORDINATES FOR DISPLAY IMAGE > 


9. (O)UTLINE FIELD OR (S)HADE AREA 0> 

10. CURRENT FIELDS ARE: 

NO. CATEGORY NAME 

(1) DO NAMEl (2) (3) 

11. INPUT CATEOGRY NAME OR FIELD NUMBERS TO BE 
DISPLAYED > 

(DO and DU only acceptable responses) 

12. DISPLAY ON THEME NUMBER - ? > 

13. MORE FIELDS? (Y)ES/(N)0 > 

14. INPUT SIX CHARACTER FIELD NAME FOR NEW FIELD > 








Messages Default 

15. INPUT CATEGORY OP NEW FIELD (DO) OR (DU) > 

16. FIELD NAME CATEGORY CONTINUE? 

(Y)ES/(N)0 > 

17. DEFINE FIELD VERTICES BY (C)URSOR OR (K)EYBOARD? > 


i 

! 



<5 






CALL FLDRPT(IO) 




• Arguments 






Parameter 

Dimension 

Type 

In/Out 

Description 


10 

1 

I 

I 

TI LUN 


e Description 






See 3 • 5 • 2 . 4 1 

.6 





3. 5. 2. 4. 8. 3 FLGDOT 





Flag dots as do 

order. 





e Calling sequence 





CALL FLGDOT 

(NFLD,NV,] 

FIELD , DODU , DLABEL) 



e Arguments 






Parameter 

Dimension 

Type 

In/Out 

Description 


NFLD 

1 

I 

I 

« of fields 


NV 

NFLD 

I 

I 

# of vertices in 
field 

each 

FIELD 

(2*MAXV,NFLD) I 

I 

X,Y positions of 
vertex 

each 

DODU 

NFLD 

I 

I 

indicate of dodu 
status of each field 

DLABEL 

NDOTS 

I 

0 

indicate of dodu 



status of each dot 


3. 5. 2. 4. 9 IRREG3 

Display portions of, or add to file FIELDSTMP. 


3*S*2*4,9«1 Lxnlca^e 

A. IMALIB 

B. P4P0TS 

C. Standard IRREG routine package 

D. FLDNAM 

E . None 



3 . 5 . 2 . 4 . 9 . 2 Interfaces 
Common name CURCON 

See no new usage beyond IRREG. 

Working files 
IRRDEF . TMP .FIELDS . TMP 

3 . 5 . 2 . 4 . 9 . 3 Inputs 

A. TAPES - none 

B. CARDS -> none 

C. Key- In - See User's Manual 

D. Other - IRRDEF.TMP 

3 . 5 . 2 . 4 . 9 . 4 Outputs 

A. Reports - none 

B . Diagnostics - 

1. NO FIELDS SELECTED. TRY AGAIN. . 
request field selection again 

2. TOO MANY FIELDS. DELETE ONE FIRST 
Exits 

3. Standard IRREG diagnostics 

C. Other IRRDEF.TMP. FIELDS. TMP 

3 . 5 . 2 . 4 . 9 . 5 Storage requirements 


3. S. 2.4. 9. 6 Description 


I 


Beyond the standard IRRE6 description, if you are in display mode, 
the program asks for your selection of fields to display. The 
vertices of these fields are then fed to IRRE6 to process. 

If in definition mode, the program asks for the field name/type, 
and input methods, the input field (s) are placed in FIELDS. TMP 
upon exit. 

3. 5. 2. 4. 9. 7 Flowcharts 

See LEC-6063, IRREG program document. 

3 . 5 . 2 . 4 . 9 . 8 Subroutines 

3. 5. 2. 4. 9. 8.1 FLDNAM 

Controls field selection 
e Calling sequence 

CALL FLDNAM (MFLDS,FPTR, NFL, CURDEF,DDIESF,IFST, FIELD, 10, 

NFLDS, BLOCK) 


Par£uneter 

Dimension 

Type 

IN/OUT 

Description 

MFLDS 

1 

I 

0 

1 = more fields 

0 B no more fields \ 

FPTR 

1 

I 

0 

Index to FIELD | 

(current field) 

NFL 

1 

I 

10 

Number of fields | 
left to display ? 
input 0 to initialize 

CURDEF 

1 

I 

0 

vertex input method | 

0 » cursor j 

1 = TI 1 

J 

DDIESF 

1 

I 

10 

Display/define flag | 

0 a define 1 

1 a display 1 

IFST 

1 

I 

I 

0 a initialization 1 

(don't change) | 

i 




i 




Parain»tT Diinantion Type In/Out 

FXBLD 1042*MMCU, B 0 

NAXPLD 

10 111 
BLOCK 15 II 


Description 
FIELDS. TMP in memory 

TI LDN 

IRRDBF.TNP in momory 


e Description 
See 3.5. 2.4. 9. 5 

3. 5. 2. 4. 9. 8. 2 Other routines 


See 3.5.2.4.9 .7 


3. 5. 2. 5 Dot Proceisinq 


Th« programs in this ssction allow the analyst to view dots over 
the image or in scatter plots. He may identify individual 
dots by cursor, or he may enter dot numbers at the console. He 
may relabel dots at will. To aid the analyst, individual dots 
can be alarmed and reports can be generated. If he wishes, 
he may see trajectory plots; he may also examine magnifications 
of individual dots and their surroundings. 

3. 5. 2. 5.1 Dot Group Crosshair Overlay (DOTOVR) (Programmed and 
Documented by R. Rodriguez and S. Thadani) 

This program allows the user to select a group of dots and to 
overlay them as crosshairs on the video image. 

3. 5. 2. 5. 1.1 Linkages 

♦ATTACH BLKTHM *DATE *DETACH DOTIN *FRONT *INTPF *IRT *IWT 
♦OUTPUT ♦SECNDS ♦SETBIT ♦SETEF ♦TIME ♦WAIT 


♦-Image 100 (IMALIB) LIBRARY system routines 


3. 5. 2. 5. 1.2 Interfaces 


A. 


COM4 

Parameter 


Update by 
Subroutine 


TX1,TY1,TX2,TY2 

IMWIND 

CLUWND 

CLAWND 

NUMDOT 

DOTARY 


Referenced by 
Subroutine 

DOTOVR 

DOTOVR 

DOTOVR 

DOTOVR 

DOTOVR 

DOTOVR 


DOTIN 

DOTIN 



Read Inputs for 
Grid Coordlnatss« 
iThsme Numbers/ end| 
Display Option 


Call Dot Group Selection Program 
(DOTIN) to determine dots In 
Selected group 



Figure 3-15. Dot grid Crosshair Overlay 







Write even lines and odd lines for 
this band to theme from the 
separate arrays 








3*5»2*5*1»3 Inputs 

Th« us«r inputs* to program qoerloa via tho DISPIAY terminal* 
identify the particular subset of dots to be displayed* the 
video image coordinates* tiie type of crosshair display* and the 
theme on %fhich the dots are to be written. (See JSC-IHhGB-lOO 
USERS MhNUAL* Part III CAMS Section 6) 

3. 5.2. 5. 1.4 Outputs 

A. The output is a selected subset of dots written on a theme 
on the video display. 

B. Diagnostics 

**** invalid input **** (Input must be transmitted again) 

NO DOTS FOUND (program goes to termination) 

Dot crosshair overlay completed (End of Run) 

3. 5. 2. 5. 1.5 Storage Requirements 
DOTOVR occupies 66 blocks. 

3. 5. 2. 6. 1.6 Description 

DOTOVR will set constants and initiate times* clear the display 
terminal screen* and query user for grid coordinates. The user 
may input a set of coordinates or select from common the standard* 
cluster* or classification image coordinates. The program checks 
to see if the Tape Coordinates are missing and sets them to a 
standard if they are. The magnification factors are computer 
based on the coorainates. The cross hair mark size is set. The 
user next select the theme number (default • 8) . Subroutine 
DOTIN is called for the dot subset. It returns the number of 
data and a Dot array. The user now selects a display option 
(1 ■ write over* 2 • add-on do not erase dot* 3 ■ add on full 


cross) (default ■ 2) . The magnification factors and the corner 
point are computed. 

The Dot array is tested to determine if any data on a particular 
band are to be processed. If there are some, the even lines and 
the odd lines in the band are read from the theme into separate 
arrays. The arrays are modified to reflect the display option 
and the dot to be displayed inside the specified grid. The 
even lines and the odd lines for the band are written on the 
theme. The desired dot are displayed by crosshairs on the theme. 
Repeat for all 11 bands. 

3. 5. 2. 5. 1.7 Flowchart 
Presented in Figure 3-15. 

3 . 5 . 2 . 5 . 1 . 8 Subroutine 
3. 5. 2. 5. 1.8.1 BLKTHM 

This program puts labels, blanks, or a pattern in a particular 
area of a video theme. 

e Calling sequence 

CALL BLKTHM (ML,MU,MR,MB,NT,IBUF,IOP) 

e Arguments 


Parameter 

Dimension 

Type 

In/out 

Description 

ML 

1 

Integer 

In 

left coord, of block 

MU 

1 

It 

In 

upper coord, of block 

MR 

1 

tt 

In 

right coord, of block 

MB 

1 

tl 

In 

button coord, of block 

NT 

1 

M 

In 

theme number 

IBUF 

(To be de- 

n 

In 

Data array (buffer) 


termined 
by calling 
program set 
to 1. 


/ 7 / 


Parameter PlmensiCTi Type In/Out Description 

lOP 1 Integer In Option for output 

-0, fill block with 
data in IBOP 

»1, fill block with 
0*8, if IBOP (1)»0 
fill block with l*s, 
if IBOP (1) =1 

e Description 

BLKTHM receives the block coordinates, the theme number, 
the buffer address, and the option thru Its arguments. 

Various control constants such as the number of even lines, 
the number of odd lines, and the stairtlng line are computed 
using the coordinates. The selected lines are read from the 
selected theme into an array. If the option is zero the 
contents of the buffer are shifted into the array at the block 
defined from the coordinates. If the option is one, the 
first work of the buffer is checked. If it is zero, IPILL is 
set to all 0*8. If it is one, IPILL is set to all I's. 

The contents of IPILL are shifted into the array rather than 
the contents of the buffer. The modified array is then 
written back to the theme. 

This process is repeated in bands of up to 32 lines at a time. 
First the even lines are done, then the odd lines and again the 
up to 16 even and up to 16 odd lines until the required block 
is filled. 

3. 5. 2. 5. 1.8. 2 DOTIN 

This progreun selects the dot subset to be displayed. 

• Calling sequence 
CALL DOTIN (10, II) 

• Arguments 



Parameter Dimension Type In/Out Description 

10 1 Integer In Unit number 

11 1 Integer Out Status word 

• Description 

DOTIN queries the user via a display terminal for dot subset 
desired. The subset is located and the dot listed. If 
acceptable, the program returns. If not, the selection 
process is repeated. 

3. 5. 2. 5. 2 Dot Group Scatter Plot (SCPLOT) (Programmed and docu- 
mented by T. Kell) 

This program 

A. Generates dot and cluster scatter plots 

B . Erases windows 

C. Does whole screen logical operations on themes. 

3. 5. 2. 5. 2.1 Generate Scatter Plots (DGSCPL) (Programmed and 
documented by T. Kell) 

3. 5. 2. 5. 2. 1.1 Lin)cages 

A . IMALIB 

B. P4POTS 

C. CSGDQH, LIN, FFUNC, SHELL, CLUSEL, DOTIN (See Vol. 3) 

D. DGSCPL, PLOT, SETVID, SETWIN 

E. Task 'WINDRM' performs operation 2 and task 'THLOFM' performs 
operation 3. 

3. 5. 2. 5. 2. 1.2 Interfaces 

A. Common name COMl 

Parameter Set by Referenced by 

ACDATE DGSCPL 

CHNVBC VALCK 


B 


Common name COM2 


Parameter 

Set by 

Referenced by 

ADATES 

— 

DSCPL 

SOILGR 

Common name COM4 

DGSCPL 

Parameter 

Set by 

Referenced by 

ACDISP 

FUL0I3 

DGSCPL 

III 

•1 

If 

G 

M 

tl 

B 

II 

It 

SPWIND 

SETWIN 

SETWIN 

NUMDOT 

DOTIN 

DESCPL 

DOTARY 

n 

DGSLPL 

GMIN 

— 

n 

GMAX 

— 

It 

FULL 

2. 5. 2. 1.3 

Inputs 

II 


A. Tapes - none 

B. Cards - none 

C. Key-in - see User’s Manual 

D. Other - DOTS.TMP 

CLUSTATP.TMP 

3. 5. 2. 5. 2. 1.4 Outputs 

A. Reports - scatter plot report - see User's Manual 

B. Diagnostics 

"CAN NOT PROCEED" - re-requests dot or cluster option 
"NO DOT SELECTED. TRY AGAIN. . ." 
asks for dot, cluster selection again. 

C. Other - Pile SCATXY.TMP 






'mm 




3. 5. 2.5. 2. 1.5 Storage Requirements 
SCPLOT occupies 88 blocks. 

3.5.2. 5. 2. 1.6 Description 

Only option 1 of 3. 5. 2. 5. 2.1 will be described. The user is 
requested to select the desired window, dots or clusters and 
which acquisition, the scaling for output, the desired channels, 
the desired theme and then calls OOTIN or CLUSTEL to select the 
appropriate items. The scatter plot points are then read from 
DOTS.TMP or CLUSTAB.TMP, scaled and plotted. 

3. 5. 2. 5. 2. 1.7 Flowcharts 

3. 5. 2. 5. 2. 1.8 Subroutines 

3. 5. 2. 5. 2. 1.8.1 SETWIN 

Set scatter plot window 
e Calling sequence 
CALL SETWIN (10) 

Parameter Dimension Type In/Out Description 
10 1 II TILUN 

e Description 

Program requests N,C, or C/R to get next window, cursor 
designated window or current window after displaying current 
window . 

If N is entered process restarts with next available window. 


/'7S^ 










If C is entered the cursor coordinates are reentered and 
the entered window becomes the current window. 


If C/R is entered, the PGM terminates. 


3. 5. 2. 5. 2. 1.8. 2 SETVID 

Display a line of constant value on the CRT. 
e Calling sequence 


Call SETVID (Y,D) 


Parameter Dimension 

Y 1 

IZE£ 

I 

In/Out 

I 

Description 
CRT Line # 

D 1 

I 

I 

Output data 

Description 

Line Y is read for channels 

D is 

stored in the line 


over the desired range, and the line is re-output. 


3. 5. 2. 5. 2. 1.8. 3 Plot 


Plots scatterplot 
• Calling sequence 
Call PLOT (K, I) 

Parameter Dimension Type In/Out 
K 1 I 10 


I 


1 II 


Description 

Index to first dot 
to be plotted this 
pass 

Index to last dot to 
be plotted this pass 


• Description 

On entry this program checks to see if the set of dots to be 
plotted on this call has the same vertical position as the 
line currently in the buffer. If not, the current buffer is 
written to the CRT and succeeding lines are read, axised, 
and written until the dot line is about to be modified. Then, 
or if the first test is ok, the next line is read and axised. 


This is not done if the line has already been read. Then 
the dot data is plotted, the line is written and the next 
line is read, axised, plotted, and saved for the next pass. 
This process is repeated in successive calls. 
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Figure 3-16 .- Continued. 
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SVBROUTINB: Dot Group Scatter Plot 
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SUBROUTINES Dot Group Scatter Plot (cont) 
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SOBROUTZNBt Dot Group Scatter Plot (coat) 
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SOBROOTHIBt Dot Group Scattor Plot (cant) 
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3. 5. 2. S. 2. 2 Erase Windows (WINDER, WINDRN) 
n.l Linkage 

A. INALZBt IRK, ZWX,INTPF, FRONT. 

B. FORTRAN: CLOSE, OPEN 

C. SHARED SUBROUTINES AND UTILITIES: BLKTRM,VDALTR 

D. PRIVATE SUBROUTINE: NONE 

n.2 Interfaces 

A. COMMON NAME: COM4 

PARAMETER UPDATE : NONE 

n.3 Inputs 

N/A 

n.4 Output 

A. N/A 

B. N/A 

C. FILE: (300,1]SCATXY.TMP. 

n.5 Storage Requirements 

n.6 The subroutine Winder consists of two subroutines BLKTHM 
and VDALTR which reads the cursor coordinates from the Keyboard 
input, searches the window from the globe common (COM4) , accepts 
the theme track number or FULL to be erased from the Keyboard, 
then calls the subroutine BLKTHM to erase that particular theme 
track in the window or calls VDALTR to erase the full window. 

n,7 Flow chart 

See Figure 3-16a. 
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3. 5. 2. 5. 2. 3 Logical Operations on Themes (TKLOPM, THNLOP) 
n.l Linkage 

A. IMALIB; IC0M, JAND, INTFF, IWT, FRONT, WAIT, IRT 

B. FORTRAN; I0R, IE0R 

C. WONE 

D. NONE 

n.2 Interfaces 
N/A 

n.3 Inputs 
N/A 

n.4 Outputs 
N/A 

n.5 Storage Requirement 

n.6 The subroutine THML0P performs the logical operation (i.e. 
AND, OR, Exclusive OR, or substraction) between two input theme 
tracks which user inputs from the Keyboard, then output to the 
user selective theme track. 

n.7 Flow Chart 

See Figure 3>16b. 

n.8 Subroutines 

NONE 
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Figure 3-16b. 


SUBROUTlMBx Theme Logical Operation 
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3. 5. 2. 5. 3 Single Dot Labelling (DTOPSD) (Programmed and docu- 
mented by L. F. Robinson) 

This program will perform the following functions t 

e Dot selection for processing 
e Window Erase 
e Dot Blowup 
e Trajectory plot(s) 

e Group typing for current dot selection 
e Single Dot labeling 
e Single Dot typing 

3. 5. 2. 5. 3.1 Linkages 

♦ATTACH BLOWUP *CLOSE *DETACH DOTLAB **ELAPS *EXIT FINDOT *FRONT 
GTYPE HSEKPC *IBYTE *IDATE *IRV *IWL *OUTPOT **SETEF STYPE 
♦TIME TRAJPL VDALTR ♦WAIT ♦♦WINDER 

♦IMAGE 100 (IMALIB) LIBRARY system routines 

♦♦CAMS HYBRID system utility routines 

3. 5.2. 5. 3. 2 Interfaces 


COMl 


Parameter 

Set by Reference 

ACDATE 

DOTPRO 

CATTH 

DOTLAB 

COM2 


Parameter 


NOACQ 

DOTPRO 

ADATES 

TRASPL, DOTPRO 

S0ILGR 

DOTPRO 

NTYPEl 

STYPE, GTYPE 





CATNAM 

NOCAT 


DOTLAB, DOTPRO 
DOTLAB 


COM3 

Parameter Set by Referenced by 

UPLA63 DOTLAB DOTLAB 

COM4 

Parameter 

AODISP 
DTWIND 
SPWIND 
NUMDOT 
DOTARY 
GMIN 
6MAX 
DLABEL 
TYPE 
IMWIND 
FUL 

B. External Files 

1. ^DBO: [300,1] DOTS. TMP 

2. ^ t300,l]DOTGXY,TMP 

3. ^ [300,1]SCATXY.TMP 

4. ^DBO: [300,1] GLOBAL. TMP;1 

3 . 5 . 2 . 5 . 3 . 3 Inputs 

User inputs to this program determine the type of dot processing 
to be accomplished: Erasing of window space, dot area enlarge- 

ment, display of dot acquisition data in a trajectory plot, group 
typing of the dots in the current dot selection, single dot 
labeling and single dot typing. (See JSC - IMAGE - 100 USERS 
MANUAL, PART III CAMS Section 8) . 



DOTPRO 

BLOWUP 

TRAJPL TRAJPL, FINDOT 
GTYPE, FINDOT 
DTYPE, FINDOT 
rRAJPL 
TRAJPL 

DOTLAB DOTLAB, DOTPRO, GTYPE 

GTYPE 

FINDOT 

TRAJPL 
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3.5.2.5.3.4 Outputs 

A. The outputs from this progrwn consist of a Dot Data Report, 
alarmed Video data* Bnglarged Dot Video display. Dot Trajec- 
tory plots, altered Dot type and label information. 

B. Diagnostics 

WARNING NO ACQUISITION ON DISPLAY (Program continues) 

Other diagnostics consist of a message being repeated if the 
reply to it is considered invalid* 

3. 5.2. 5. 3.5 Storage Requirements 
DOTPRO occupies 86 blocks. 

3. 5. 2. 5. 3. 6 Description 

DOTPRO clears the terminal screen, displays date/time, and calls 
FINDOT. FINDOT assists the user in selecting a particular dot 
for processing and returns that grid number to the main routine. 
DOTPRO then produces a Dot Data Report and alarms the Video 
screen with the selected dots' four channel data from the CIR 
image, or, if that is not available, from the dot data file. 

Next the user is asked to select an option from the list described 
in 3. 5. 2. 5. 3 above. These options are handled by subroutines 
described further on in this section* 

3 . 5 . 2 . 5 . 3 . 7 Flowchart 
Presented in figure 3-17. 

3. 5. 2. 5. 3. 8 Subroutines 
3. 5. 2. 5. 3. 8.1 FINDOT 

This subroutine provides the user with the capability of select- 
ing a particular dot grid number for processing. 
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Figure 3-17.- Sinaia, nn«- Labelling. 
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SUBROUTINE} Single Do^ Label 
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SUBROUTINES Single Dot Labelling (cont) 
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• Calling sequence 

CALL PZNDOT (N,EXFL) 


Arguments 


Parameter 


Dimension 


EXFL 


Description 


Type 

INTEGER 


INTEGER 


In/Out 


Description 

dot grid 
number 

exit flag 


FINDOT gives the user the option of selecting a dot via KEYBOARD 
entry, CURSOR encirclement or from the CURRENT DOT SELECTION. 

If the 'KEYBOARD option is used the entry is checked for ^ or 
£ 209. In CURSOR encirclement the X,Y tables for scatter plots 
and the CIR iamge are compared to the cursor X,Y coordinated for 
a match and the resulting dot grid number (s) are supplied for 
verification. CURRENT DOT SELECTION causes a display of those 
dots contained in the current dot selection and the user is asked 
to choose from them. Error checking is done and one of the dis~ 
played dots must be chosen. At any point in this subroutine 
the user may EXIT, the subroutine (enter an "X" on the terminal) 
or back up one logical operation (enter a "B" or the terminal) . 


3. 5. 2. 5. 3. 8. 2 BLOWUP 

This subroutine provides a 2 for 1 blowup of a designated area 
on the VIDEO display. 

e Calling sequence 

CALL BLOWUP (EXFL) 


Arguments 

Pareuneter 


EXFL 


Dimension Type In/Out Description 

1 INTEGER OUT exit flag 




1 






• Description 

BLOWUP requests that the user size and position the cursor around 
the area to be enlarged and signal readiness with a "CR” entry. 
Upon receiving this "CR” the subroutine calculates the area to 
be blownup and reduces the cursor to a 2 x 2 pixel display. It 
then asks the user to position it where the enlargement is 
required. Another "CR" signals user readiness. At this point 
the cursor is expanded to show the size of the area and the mes- 
sage "PROCEED (Y)ES or (N)0" is displayed. A negative reply 
simply starts the subroutine at the beginning, a positive reply 
causes the blownup to occur. 

3. 5. 2. 5. 3. 8. 3 TRAJPL 

This subroutine will output a trajectory plot for up to six 
acquisitions of a given dot. 

e Calling sequence 

CALL TRAJPL (EXFL,N,6RN0B) 


Arguments 





Parameter 

Dimension 

Type 

In/out 

Description 

EXFL 

1 

INTEGER 

OUT 

exit flag 

N 

1 

INTEGER 

IN 

dot grid . 
number 

GRNOB 

6 

INTEGER 

IN 

green number 
for up to 6 
acquisitions 
of the dot 
grid number 
(N) . 


e Description 

TRAJPL allows the user to select the display area for the plot 
either by using an available window of by cursor definition. A 
coordinate system is requested and then scaling factor are 
required of the user. The plot is then generated from the 




■ 


selected coordinates on an acquisition date hierarchy i.e»t 
latest date to earliest date. 

3. 5. 2. 5. 3. 8. 4 6TYPE 

This subroutine accomplishes group typing using the dots from 
the CURRENT DOT SELECTION. 

e Calling sequence 

CALL 6TYPE (EXFL) 

e Arguments 

Parameter Dimension Type In/Out Description 

EXFL 1 INTEGER OUT exit flag 

e Description 

GTYPE requests the user indicate » via the terminal keyboard, 
the number of dots from the CURRENT DOT SELECTION required to 
be set to type 1. The rest, if any, of the dots are set to 
type 2. The only exception to this rule is that unlabeled dots 
are ignored as are DO and DU dots. 


3. 5. 2. 5. 3. 8. 5 DOTLAB 

This subroutine is used to label a specified dot. 
e Calling sequence 


CALL DOTLAB 

(EXFL,N) 




e Arguments 

Parameters 

Dimension 

Type 

In/Out 

Description 

EXFL 

1 

INTEGER 

OUT 

exit flag 

N 

1 

INTEGER 

IN 

dot grid 
number 





'mmm 




• Description 

DOTIAB informs the user of the previous label, if any, for the 
dot in question and requests the new label. If the new label is 
a NEW CATEGORY the user is so informed. The user is then shown 
the label just requested and asked wheather to proceed or not. 

A negative reply recycles the subroutine, a positive reply gets 
the dot labeled and the subroutine then returns. 


3. 5. 2. 5. 3. 8. 6 STYPE 


This subroutine will change the type for a specified dot. 


e Calling sequence 

CALL STYPE (EXFL,N) 
e Arguments 

Parameter Dimension Type 

EXFL 1 INTEGER 

N 1 INTEGER 

e Description 


In/Out Description 

OUT exit flag 

IN dot grid 

number 


STYPE informs the user of the previous type, if any for the dot 
in question and asks for the new type. If the new type is one 
the number of type one dots is increased by one, if the old type 
is one the number is decreased by one. The type change flag is 
then set and the subroutine does a return. 
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3.5. 2.6 Automatic Clusfr Laballina (ACUAP) (Proaraiwwd and 
Documented by H, Thadanl) 

This algorithm labels clusters according to the majority label 
of the 'k* nearest type 1 labelling dots. Ties are resolved by 
discarding the kth dot in the random sequence and! repolling. 

3. 5. 2. 6.1 Linkages 

A. IMALIB - ATTACH, DETACH, FRONT, INTFF and OUTPUT. 

B. FORTRAN - ASSIGN, CLOSE, ELAPSE, UPDATE, OPEN and TIME. 

C. PRIVATE SUBROUTINES - CLABEL, KNNPRN, RDODAT, RDCLMN and 
ALSORT. 


3. 5. 2. 6. 2 Interfaces 


None 

A. Common name CONI 

Updated by 
Paraioeter Subroutine 

ACDATE 


CHNVEC 


B. Common name COM2 

Updated by 
Parameter Subroutine 

ISEG 

ABATES 


Referenced by 
Subroutine 

ACLLAP 

RDODAT 

KNNPRN 

RDODAT 

RDCLMN 

CLABEL 

KNNPRN 


Referenced by 
Subroutine 

ACLLAP 

KNNPRN 

ACLLAP 

RDODAT 

KNNPRN 



^7 




Updated by 

Referenced by 

Parameter 

Subroutine 

Subroutine 

SUNBL 


CLABEL 

NTYPEl 


ACLLAP 



KMNPRN 

CATNAM 


ACLLAP 

Common name 

COM3 



Updated by 

Referenced by 

Parameter 

Subroutine 

Subroutine 

EPLA64 

ACLLAP 

ACLLAP 

NEWLAB 

ACLLAP 

ACLLAP 

Common name 

COM3 



Updated by 

Referenced by 

Parameter 

Subroutine 

Subroutine 

RANDOM 


ACLLAP 

DLABEL 


ACLLAP 

TYPE 


ACLLAP 

Common name 

HGT 



Updated by 

Referenced by 

Parameter/aray Subroutine 

Subroutine 

BOFDOT 

RDODAT 

RDODAT 

BUFCLM 

RDCLMN 

RDCLMN 

TDIS 

CLABEL 

CLABEL 

CHAMVC 

RDODAT 

RDODAT 

NACQ 

RDODAT 

RDODAT 

ALABEL 

ACLLAP 

ACLLAP 

CLLAB 

ACLLAP 

ACLLAP 

ILABEL 

CLABEL 

CLABEL 

FLABEL 

CLABEL 

CLABEL 

ARIND 

ACLLAP 

ACLLAP 


CLABEL 

CLABEL 

Working file 

! name(s) . 



1. Dot data file - [300,1]DOTS.TMP 

2. Cluster stat. file - [300,l]CLUSTATS.TMP 


»<•'/ 




nr^sr^js 


3, N«ar«st neighbor file • [300,1]MM.TMP;1 
3.5. 2. €.3 Inputs 

A. Piles - D0T8.TMP and CLUSTATS.TMP 

B. Key-in - 

1. User keys in number of type 1 labelling data. Default ■ 
NTYPEl 

2. User keys in number of nearest neighbors. Default ■ k. 

3. User keys in report and output device. 

3. 5. 2. 6. 4 Output 

A. Reports 

1. Brief cluster labeling report (See Figure 3-18) 

2. Detailed nearest neighbor report 

B. Files - NN.TMP file 

C. Diagnostics - 1. If acquisitions of data base do not match 
those of classification message printed out on user console 
will be as follows: 'FATAL ERROR.']! CLASSIFICATION ACQUISI- 
TIONS DO NOT MATCH DATA BASE ACQUISITIONS' 

3. 5. 2. 6. 5 Storage 
ACLLAP occupies 93 blocks. 

3. 5. 2. 6. 6 Description 

This program labels clusters automatically using the following 
steps t 

1. Compute LI distances (corrected by the appropriate sun angle 
factor 5) to each of 'k' type 1 dots using the formula: 

NOCHAN 

DISTANCE (ISUB,K) » ^ (MEAN(I,ISUB) - 

I - 1 




V* 




where MEAN (X,ZSUB) - mean vector for channel X, aubelaas 

ZSUB 

DOTDATA (Z,K) - dot data vector for channel X, dot K. 

8(Z) - sun angle correction factor for channel I 
DISTANCE (ISUB,K) - LI distance of mean I8UB to dot K. 

2. For subclass ISUB sort distance vector DISTANCE in ascending 
order. Sort corresponding labels of dots maintaining random 
sequence. 

3. Find majority label of nearest k distances. In the case of 
a tie, discard the kth dot and repoll. 

4. Label cluster ISUB acct)rding to majority label. 

5. Repeat procedure for till clusters. 

3. 5. 2. 6. 7 Flow chart 
See Figure 3-19. 

3. 5. 2. 6. 8 Subroutines 
3. 5. 2. 6. 8.1 RDODAT 

This subroutine reads the dot data working file (DOTS.TMP) and 
returns dot data vector DOTDAT for all *n* type 1 dots and user 
channels. It will also return diagnostic described in 3. 5. 2. 6. 4. C. 

e Calling sequence 


CALL RDODAT 

(N, ARAND, 

DOTDAT, 

DFLAG) 


e Arguments 
Parameter 

Dimension 

IXEl 

In/Out 

Description 

DOTDAT 

16,NDOTS 

I 

0 

dot data vector 


BRIEF CLUSTER UBELLING REPORT 



SBQ4ENT ID«B75B 

ACQUISXTXON(S)- 76148 76166 0 000 
CLUSTERING CHANNELS- 12 S 45 6 7 
NUMBER OP TYPE 1 UBELLING DOTS- 10 
NUMBER OF NEAREST NEIGHBORS USED- 2 

8 


CLUSTER NUMBER OF MAJORITY 

NEAREST NEIGHBORS 

AUTOMATIC 

UBEL 

i 1 

If 


2 2 

N 


3 2 

N 


4 2 

N 


S 1 

N 


E(X)IT, (R)ETURN, OR PAGE (F)ORWARD >F 



BRIEF CLUSTER LABELLING REPORT 



SEGMENT 10-9738 

ACQUISITION (S)- 76148 76166 0000 

CLUSTERING CHANNELS- 1234.567 
NUMBER OF TYPE 1 LABELLING DOTS- 10 
NUMBER OP NEAREST NEIGHBORS USED- 2 

8 


CLUSTER NUMBER OF MAJORITY 

NEAREST NEIGHTORS 

AUTOMATIC 

LABEL 

6 2 

N 


7 2 

W 


8 2 

N 


® ■* 

N 


10 2 

N 


E(X)IT, (R)ETURN, OR PAGE (F)ORWARO >X 
E(X)IT OR (R)ECYCLE )>X ^ f 




Figure 3-18.— Autcmatie Brief Cluster Labolliiv^ Report 
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s 

t 
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CLUSTER MEAN 
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1 
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Figure 3-19,— Automatic Cluster Labelling. 






Parameter 

Dimension 

Type 

In/Out 

Description 

N 

1 

I 

I 

number of type 1 dots 

DFLA6 

1 

I 

0 

flag for diagnostic 

ARAND 

NDOTS 

I 

I 

random dot index vector 

3. 5. 2. 6. 8. 2 RDCLNN 
This subroutine reads the 

cluster 

is filed 

(CLUSTATS.TNP) and 


returns mean vector AMN for sxiblcass ISUB and all user channels. 
• Calling sequence 


CALL RDCLMN 

(ISUB, ANM, 

ITOCHN 

, CHAN) 


e Arguments 
Parameter 

Dimension 

Type 

In/Out 

Description 

ISUB 

2 

I 

I 

Subclass 

AMN 

16 ,MAXSUB 

R 

0 

Mean vector 

ITOCHN 

1 

I 

I 

No. of channels 

CHAN 

16 

I 

I 

Channel vector 

3. 5. 2. 6. 8. 3 CLABEL 





This subroutine computes and sorts the LI distance vector in 
ascending order and labels the cluster according to the majority 
label. The sorting is done via subroutine ALSORT. 

e Calling sequence 


CALL CLABEL 

ACAT) 

Argximents 

(ISUB, N, 

AMN, DOTDAT, NCAT 

, ARAND, KNN, ITOCHN 

Parameter 

Dimension 

Type 

In/Out 

Description 

ISUB 

1 

I 

I 

Subclass # 

N 

1 

I 

I 

No. of type 1 dots 

AMN 

16,MAXSUB 

R 

I 

Mean vector 

DOTDAT 

16, NDOTS 

I 

I 

Dot data vector 

NCAT 

1 

I 

I 

No. of categories 

ARAND 

NDOTS 

I 

J/v 

I 

Random dot index 
vector 


Parameter 

Dimension 

Type 

In/Out 

Description 

KNN 

1 

I 

I 

No. of nearest neighbors 

ITUCHN 

1 

I 

I 

No. of channels 

ACAT 

MAXSUB 

I 

I 

Array containing cate- 
gory indices 

TDIS 

NDOTS 

R 

1 

LI distance vector 


3. 5. 2. 6. 8. 4 KNNPRN 

This subroutine provides the option to and prints either of the 
2 reports on one of the following devices: 

1. The Gould Printer 
2* The line printer 
3. The users terminal 

• Calling sequence 
CALL KNNPRN (A) 

• Arguments 
Parameter 

A 


Dimension Type In/Out Description 
1 I I/O A = 0 exit 


c2/^ 


3. 5. 2. 7 Cluster Map Display (CLUDIS) (Prograromed and Docuinented 
fay 6. Champagne) 

This program produces unconditional, conditional, and mix cluster 
maps that may be displayed on the themes on the I-IOO. 

3 . 5 . 2 . 7 . 1 Linkages 

A. IMALIB 

B. FORTRAN 

C. SHARED: GETCOO, TWRITE, ZOOOM, BLKTHM 

D. PRIVATE: EFWARN, UNCDIS, CONDIS, MIXDIS, LISTl, CATTHM, 

CLUTHM, CLABEL, DEFALT, CONDIT, LIST2, and MIXED 


3. 5. 2. 7. 2 Interfaces 


A. COMl 

Parameter 

NOSUB 


Updated by 
Subroutine 


B. COM2 

Parauneter. 

NOCAT 


Updated by 
Subroutine 


CATNAM 


Referenced by 
Subroutine 

LISTl 

CATTHM 

CLUTHM 

CLABEL 

DEFALT 

CONDIT 

LIST2 

MIXED 

Referenced by 
Subroutine 

CATTHM 

CLABEL 

DEFALT 

LISTl 

CATTHM 

CLABEL 

DEFALT 

LISTl 


COM3 

Updated by 

Referenced by 

Parameter 

Subroutine 

Subroutine 

EPLAGl 


CLUDIS 

EFLAG4 


CONDIS 



MIXDIS 

NEWLAB 


LISTl 



CATTHM 



CLABEL 



DEFALT 



LIST2 

COM4 

Updated by 

Referenced by 

Parameter 

Subroutine 

Subroutine 

TXl 


GETCOO 

TYl 


GETCOO 

TX2 


GETCOO 

TY2 


GETCOO 

IXl 


GETCOO 

1X2 


GETCOO 

lYl 


GETCOO 

IY2 


GETCOO 

CLUWND 

UNCDIS 



CONDIS 



MIXDIS 


L0C0M2 

Updated by 

Referenced by 

Parameter 

Subroutine 

Subroutine 

CMASK 


UNCDIS 


CATTHM 

CLUTHM 

TWRITE 

CLABEL 

DEFALT 
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Updated by 

Referenced by 

Parameter 

Subroutine 

Subroutine 

CONDIS 

MIXDIS 

ZOOM 

Updated by 

Referenced by 

Parameter 

Subroutine 

Subroutine 

IC 


UMCDIS 



CATTHM 



CLUTHM 



TWRITE 



CONDIS 



MIXDIS 

TC 


Scune as above 

IX 


Same as above 

lY 


Same as above 

TX 


Same as above 

TY 


Seune as ed>ove 

MX 


Save as above 

MY 


Same as above 

FATAL 

Updated by 

Referenced by 

Parameter 

Subroutine 

Subroutine 

ZO 


UNCDIS 


CONDIS 

MIXDIS 

ZOOM 


H. Working File Ncunes 





CLUSTERMP.TMP 

NN.TMP 


3 *$* 2*7 «3 


A. N/A 

B. N/A 

C. See User's Manual 

3. 5. 2. 7. 4 Outputs 

A. N/A 

B. • *** INPUT ERROR *** ' 

3 . 5 . 2 . 7 . 5 Storage 
CLUDIS occupies 94 blocks. 

3 . 5 . 2 . 7 . 6 Description 

The module is a driver and requests options from the user for 
determining the kind of cluster map desired. NN.TMP and 
CLUSTERMP.TMP are opened and the existence flag for CLUSTERMP 
is checked to see if it is on. Upon teirmination/ global common 
is saved. 


3. 5. 2. 7. 7 Flow Chart 

Functional flow chart is to be found in Figure 3-20. 

3 . 5 . 2 . 7 . 8 Subroutines 
3 . 5 . 2 . 7 . 8 . 1 EFWARN 

Warns user that CLUSTERMP.TMP is not available, 
e Call EFWARN 
e N/A 

• The program tells the user that the cluster map file is not 
on working storage and that the user may get cluster map 
reports if he wants them. 
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3. 5. 2. 7. 8. 2 OMCOIS 

Displays unconditional cluster map 

• CALL UNCDIS 

• N/A 

• The program allows the user to change the default input 
coordinates of the cluster map file and the default output 
coordinates for display of the themes. The user is given 
options to list the clusters and categories, assign categories 
to themes, assign clusters to theme, and change cluster 
labels. The user may write the clusters to theme. 

3. 5. 2. 7. 8. 3 CONDIS 

Finds the conditional clusters 

e CALL CONDIS 

• N/A 

e Everything that applies to UNCDIS applies to this program. 

In addition, this program finds the conditional clusters. 

3. 5. 2. 7. 8. 4 MIXDIS 

Finds the mixed clusters 

• CALL MIXDIS 

• N/A 

• Everything that applies to UNCDIS applies to this program. 

In addition, this program finds the mixed clusters. 

3. 5. 2. 7. 8. 5 GETCOO 

Gets coordinates from the user. 

• CALL GETCOO (IC, TC, ISET) 

• Arguments 


f tfdEDING PAGE BLANK NOT FILMED 




Parameters 

Dimension 

Type 

In/Out 

Description 

IC 

4 

Integer 

Out 

Output coordinates 

TC 

4 

Integer 

Out 

Input coordinates 

ISET 

1 

Integer 

Out 

Flag 


• The default input and output coordinates are displayed to 
the user. The user may accept the default coordinates or 
change them to some other acceptable coordinates. 

3. 5. 2. 7. 8. 6 LISTl 

Displays cluster numbers and their categories 

e CALL LISTl 
e N/A 

e The program determines how many lines will be needed for 
display of cluster numbers and their categories and their 
proceeds to display those clusters and categories on TX. 

3. 5. 2. 7. 8. 7 CATTHM 

Assigns categories to theme for display 

e CALL CATTHM 
e N/A 

e The user tells the program which categories are to be assigned 
to which themes. In addition ^ the user has the option of 
adding to or replacing what is in the theme and he may also 
have category displayed as is or have the negative of category 
displayed. 


3, 5. 2. 7. 8. 8 CLUTHM 

Assigns clusters to theme for display 

• CALL CLUTHM 
e N/A 

e The user tells the program which clusters are to be assigned 




to which themes. In addition, the user has the option of 
adding to or replacing what is in the theme and he may also 
have the clusters displayed as is or have the negative of 
the cluster displayed. 

3.5. 2. 7. 8.9 CXABBL 

Changes cluster labels 

e CALL CLABEL 
e N/A 

e The clusters and their categories are displayed to the user. 
The user has the option to change the category of any cluster. 
The change is made on global common. 

3.5.2.7.8.10 TWRITE 

Writes out the clusters to themes. 

e CALL TWRITE 
e N/A 

e The clusters and categories which have been assigned to 

themes are written to the themes on the I-lOO by this program. 
The cluster map file is read to locate the cluster location 
and the corresponding bytes are turned on on the I-IOO. 

3.5.2.7.8.11 DEFALT 

Assigns categories to themes 
e CALL DEFALT (CHASK) 

e Parameter Dimension Type In/Out Description 
CMASK 60 Byte Input Cluster mask 

e If the user decides to accept the defaults in category to 
theme assignment, the program will assign the categories 
of that segment to the themes, beginning with category one 
and theme one. 




3.5.2.7.8.12 CONDIT 

Detarmlnet which of the olostere are conditional 
e CALL CONDIT (COND, I8BT) 

e Parameter Dimeneion Type In/Out Description 

CCHID NAXSUB Integer Output Conditional clusters 

ISBT 1 Integer Output Flag 

e This program reads the nearest neighbor file and with that 
information determines which of the clusters are conditional. 
When a conditional cluster is found, the corresponding 
element is set to **** in the array COND. 

3.5.2.7.8.13 LIST2 

Displays clusters, categories, and conditional or mixed clusters, 
e CALL LIST2 (DATA, IFL6) 


Parameter 

Dimension 

Type In/Out 

Description 

DATA 

MAXSUB 

Integer Input 

Mixed or conditional 
clusters 

ISET 

1 

Integer Input 

Flag 


e Everything that applies to LISTl applies to this program. In 
addition, mixed or conditional clusters, as indicated by the 
flag, is displayed also. 

3.5.2.7.8.14 MIXED 

determines which of the clusters are mixed, 
e CALL MIXED (MIX, ISET) 

e Parameter Dimension Type In/Out Description 

MIX MAX8UB Integer Output Mixed clusters 

ISET 1 Integer Output Flag 

e This program reads the nearest neighbor file and with that 
Information determines which of the clusters are mixed. 





When a mixad clustar is found, ths corresponding element 
is set to '*** in the array MIX. 


i 


I 




(sMXT 



(A u 

SfL<: 

Ot'li 

<TS 

\ 9 Nt 


I • JoMm lijr.' r.-/ • 

4 )* C^Npi yj4*<tAL 

3 - ^sHA>r 

1 - Rtf^i>}Kr% 


UM’mvOIT^^ 

Ciu%n6i< 

A?/H’ 


CPVOlfXdiwUi 

CLHSTf/f 

MiPP 

t>XSpL»^ 


MJjv o 
( iLkS'ftff 

Mfip 

> if 



Qiain K 


sLet'^rn 


^‘ \ t f 



Figure 3-20.- Cluster Map Display 
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3.5. 2. 8 Recompute Proportlona/Clasgification Map Display 

'^CPR0«RBPR0P«CLM8) (Proarjunmed W H. Thad^l and 
G» Champagne and documentea hv k. Tnaflani) 

nils algorithm reads the classification and cluster maps and 
reassigns pixels to the category they have been relabelled to 
and updates the corresponding category proportions. It also 
gives the option of displaying the classification map before or 
after the 

i 3. 5. 2.8.1 Linkages 

i 

I A. IMALIB - ATTACH, DETACH, FRONT, INTFF, and OUTPUT, CLATHM, 

I ZOOOOM, BLKTHM. 

I B. FORTRAN - ASSIGN, CLOSE, CLASS, ELAPSE, IDENTI, OPEN, 

and TIME 

j 

C. PRIVATE SUBROUTINES 

1. Recompute proportions > REPROP, RECPRN, FDLINT 

2. Classification map display - CLADIS, LIST3, CLATHM, 
and DIFLT2 . 

3 . 5 . 2 . 8 . 2 Interfaces 


Common name 

RCP 



Updated by 

Referenced by 

Parameter 

Siibroutines 

Subroutines 

ICAKNT 

REPROP 

REPROP 

IRESUB 

REPROP, RECPRN 

REPROP, RECPRN 

FLDNAM 

REPROP, FDLINT 

REPROP, FDLINT 

LABEL 

REPROP 

REPROP, RECPRN 

VERTEX 

NV 

FIELD 

LOWHI 

FL 

FLL 

REPROP 

REPROP, FDLINT 






Parameter 

Updated by 
Subroutines 

Referenced by 
Subroutines 

DIRCAT 



CHAN 

REPROP 

REPROP, RECPRN 

X 


REPROP, RECPRH 

RECPCT 


RECPRN 

PERDO 


RECPRN 

PERDU 


RECPRN 

PERTH 


RECPRN 

PERUND 


RECPRN 

NLP 


RECPRN 

NDOPIX 


RECPRN 

NDUPIX 


PN 

NTH 


RECPRN 

UNID 


RECPRN 


The recomputed proportions application program references all of 
common blocks COMl and COM3 and a few parameters from the COM2, 
COM4, and C0M5 common blocks. 

B. Working Files 

1 . Recompute proportions 

a. CIASSMAP.TMP 

b. CLUSTERMP.TMP 

c. FIELDS. TMP 

2. Classification map display 
a. CIASSMAP.TMP 

3. 5. 2. 8. 3 Inputs 

A. Key- in - refer to User's Manual 

3 . 5 . 2 . 8 . 4 Outputs 


A. Reports 

1 . Recompute Proportions 

There are two reports displayed by this module. 



a. flia ralalMllad cluster re^rt 

b. Beconputed proportions report 
2. Classification Map Display 

Refer to User's Manual 

d 

3. 5. 2. 8. 5 Storage 

RBCPRO, REPROP, and CLASS occupy 34, 68, and 68 blocks respectively. 

3. 5. 2. 8. 6 Description 

This nodule drives two separate application programs - the 
recomputed proportions application program and the classification 
map display application program. This is done via a driver 
(acronym: PLEASE) * Description of the classification map display 

application progreun will not be given here since it is identical 
to the unconditional cluster map display application program 
which has been documented elsewhere. 

Description of the recomputed proportion application program 
follows. This program begins by determining the rel£d>elled 
clusters. It then checks the existence of the classification 
map, cluster map and fields working files. The classification 
and cluster maps are then read simultaneously a line at a time. 

For every line read the DO/DU field intercept information is 
stored using subroutine fdlint. The category counts are updated 
for every line read. Finally, dot categories are updated and 
a detailed report displayed. 

3 . 5 . 2 . 8 . 7 Flow Charts 
Figure 3-23. 




3. 5. 2. 8. 8 Subroutines 


3. 5. 2. 8. 8.1 FDLINT 



• Calling sequence 


CALL FDLINT (FIELD, JJL, FLL, NOLIN, WSAMP, JJ) 


Parameter 

Dimension 

Type 

FIELD 

2XNPTS 

I 

JJL 

1 

I 

FLL 

8 

I 

NOLIN 

1 

I 

NSAMP 

1 

I 

JJ 

1 

I 


In/Out Description 

I Field vertices array 

I No. of vertices 

0 Array containing the 
ordered pixel inters 
cepts 

1 Sure line numbers 

0 No. of sanqples 

contained in the 
field of a given line 

0 The length of the 

array FLL 


3. 5. 2. 8. 8. 2 RECPRN 


This subroutine prints the recomputed proportions. The formulas 
used are: 


1. NLP * NLIN X NPIX 

2. UNID(X) = NLP - ICAKNT(X) - NDUPIX - NTH 

3. RECPCT(I) = 100 X (ICAKNT(X)) 

mw 

4. RECPCT(X) = 100 X (ICAKNT(L) ) 

NLP 

5. PERDO = NDOPIX X 100 

NLP 

6. PERDU = NDVPIX X 100 

NLP 

7. PERTH = NTO x 100 

NLP 

8. PERUND = UNID X 100 

NLP 


^ 5 ^ 


IT ’ -n 






where MLP • total no* of pixels in scene « l 

MLIN - no. of lines 
NPIX ■ no* of pixels per line 

ONID • no* of identifiable pixels * » 

ICAKMT(X) » no* of pixels in category X. 

NDUPZX “ no. of DU pixels 

NTH a no. of thresholded pixels 

RECPCT(X) = percent pixels belonging to category Z 

PEBDO a percent DO pixels 

PEBOU = percent DU pixels 

PERTH a percent thresholded pixels 

PERUMD a percent identifiable pixels 

NDOPZX a no. of DO pixels 

Note t DO and DU, pixels encoxintered are not updated to reflect 
new category. All other type pixels are updated. 


DIAGNOSTICS Please refer to User's Manual 


DATE 


TIME 

■ * 

TITLE 


RECOMPUTED CLASSIFICATION 
SUtniARY REPORT 


SEGMENT ID 

ACQUISITION DATE(S) 

CLASSIFICATION CHANNELS 

NUMBER OF PIXELS IN SCENE 

NUMBER OF DU PIXELS 

NUMBER OP DO PIXELS 

NUMBER OF THRESHOLDED PIXELS 

PERCENTAGE OP THRESHOLDED PIXELS % 

NUMBER OP IDENTIFIABLE PIXELS 

NUMBER OF CATEGORY 'X* PIXELS 



Figure 3-21.— Recomputed Classification Summary Report. 


^ / 




CIASSZFZCATION SUMMMiy 

NUMBER OF PERCENTAGE OF 

CATEGORY PZXEL8 ZN CATEGORY ZDENTZFZABLE PZXELS 

1 29 

2 38 
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Figure 3-22.- Classification Summary, 
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3. 5. 2.9 Reports 

The various interactive analysis processors in the system will 
in general generate Intermediate results. T ese intermediate 
results will aid the user in making various processing decisions 
within a particular processor. Brief reports containing inter- 
mediate results will be displayed directly to the user (on the 
terminal screen or Gould printer) by the processor that generated 
these results. The reports module will display more lengthy 
and complete results obtained normally at the conclusion of 
segment analysis. Results for generation of these reports will 
exist on temporary disk files or in common areas. The user will 
have the option of viewing the results either on the terminal 
screen (from where they may be hardcopied ) , the Gould printer or 
line printer. Where possible, the user will be provided with 
the option of specifying the display of appropriate subsets of 
results. There will be foru major report modules. They are: 

• Dot Data Report 

• Bias Correction/Classification Summary Report 
e Cluster Report 

• DO/DU Field Definition Report 

These modules are described in the following sections. 
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3.5.2.9.1 Dot Data Iteport (OOTRPT) (ProfraaimaR and documented by 
Jane Huang) 

DOT DATAr'JRBPORT (DOTRPT) prints out the dot selection report 
through subroutine DOTXN. 

3.5. 2. 9. 1.1 Linkages 

A. IMALIB - FRONT, IBYTB, OUTPUT 

B. FORTRAN or SYSTEM - SETEF, IDATE, TIME, CLOSE, CLOS$, ASSIGN 
AND OPEN$ 

C. Shared subroutine and utilities - DTCLIO, ELAPSE 

D. Private subroutine - DOTIN 


3.5. 2. 9. 1.2 Interfaces 
A. Common name COM2 

P 2 u:ameter 


Updated by 
subroutines 


Referenced by 
subroutines 


ADATES(2,MAXACD) 

NOACQ 

CATNAM(MAXCAT) 

COILGR(MAXACD) 

NOCAT 



Common name COM4 


Updated by 

Referenced by 

Parameter 

subroutine 

subroutine 


NUMDOT 

DOTIN 


DOTARY (NDOTS) 

DOTIN 


Common name COM5 


Updated by 

Referenced by 

Parameter 

subroutine 

subroutine 


RANDOM (NDOTS) 
GRID (NDOTS) 
DLABEL (NDOTS) 






D. Working fllo namot DOT working file 

3*5*2«9«1*3 Inpn^e 
None 

3. 5. 2. 9. 1.4 Outputs 

A. Report <• DOT DATA REPORT 

B. Diagnostics 

END OF DATA REPORT!!! Enter (R)estart or E(X) 

3. 5. 2. 9. 1.5 Storage 
DOTRPT occupies 60 blocks. 

3. 5. 2. 9. 1.6 Description 

6RENO ( JJl) sGRENSS ( JJl) -ARRY ( JJl) 

%^ere GRENO green number 

GRENSS greeness 

ARRY soil green munber 

3.5.2.9.1.J Flow Charts 
See figure 3>24 

3. 5. 2. 9. 1.8 Subroutines 

3. 5. 2. 9. 1.8.1 DOTIN 

CALL DOTIN (10, II) 

Pareuneter Dimension Type 

10 
II 


In/Out Description 

In Input output tinit 

Out II«1 normal return 

11*2 Exit 

lie 3 — 'Backup 




Description : 

Subroutine DOTIN allows the analyst to select the dot group of 
interest according to one of the following dot selection rules 

1. All 209 dots 

2. Unlabeled dots fr<an the random sequence 

3* Dots by type* analyst label and classifier label 

4. Bias correction dots by the classification proportion 

5. Starting dots 

6. DO/DU dots 



























3. 5 *2. 9. 2 Bias Corraction/Classifieation Summary (BXA8CR) 
(Programmed and documented by Jane Huang) 

The BXASCR program is the driver for the uncorrected proportions 
report and bias corrected computation report. 

3. 5. 2. 9. 2.1 Linkages 

A. IMALIB - FRONT, OUTPUT 

B. FORTRAN - SETEF 

C. Shared subroutines and utilities - ELAPSE 

D. Private subroutines - BIASCP, UNBIAS, SELDOT, ROFF 

3. 5. 2. 9. 2. 2 Interfaces 


Common name 

COMl 

Updated by 

Referenced by 

Parameter 


subroutine 

subroutine 

CATKNT 



UNBIAS 

NODO 



UNBIAS 

NODU 



UNBIAS 

NOTH 



UNBIAS 

DOTCLU (NDOTS) 


UNBIAS 

Common name 

COM2 

Updated by 

Reference by 

Parameter 


subroutine 

subroutine 

NOACQ 



UNBIAS 

ADATES 



UNBIAS 

Common name 

COM5 

Updated by 

Reference by 

Parameter 


subroutine 

subroutine 




DLABEL(NDOTS) 
TYPE (NDOTS) 


SELDOT 

SELDOT 


3.5.2.9.2.3 inpttt 
None 

3.5. 2. 9. 2. 4 Outputs 

A. Title of report - The bias corrected and uncorrected report 

B. Diagnostics - END OF ONCORRECTED PROPORTIONS REPORT! 1 1 the 

program will return to the main driver 

3.5. 2. 9. 2.5 Storage 
BIASCR occupies 95 blocks. 

3. 5. 2. 9. 2. 6 Description 

The driver computes % of DO and unidentified area, using the 
following equations: 

DOPCT-NODO*100 ./TPIXL 
where DOPCT — % of DO area 

NODO— total DO pixels 

TPIXL—*total pixels in the segment in this case is 22932 
UPCT-DOPCT+TPCT+XPCT 

where UPCT-- % of total unidentified area 
DUPCT— % of unidentified area 
TPCT““% of threshold area 
XPCT— % of cloud or cloud shadow area 
TPCT«NOTH*100 ./TPIXL 
where NOTH~pixels in threshold area 
DUPCT— NODU* 100 , /TPIXL 
DUPCT»NODO*100 . /TPIXL 
where NODU— pixels in DU area 

XPCT^TKNT of category XX*100./(TP1XL-NODO-NOTH-XP1XL) 

3. 5. 2. 9. 2. 7 Flow Charts 
See figure 3-28. 
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3.S.2.9.3.8 Subroutines 
3. 5. 2. 9. 3. 8.1 UNBIAS(II) 
e Calling sequence 
Call UNBIAS (II) 

Parameter Dimension Type In/Out Description 

II I Out In this case II always 

equals 3, which is 
normal return# backup# 
or exit 


Description: 

Subroutine UNIBAS prints out the report of uncorrected proportions. 

A. SELDOT(-128,-128,-2,-128, DIDU) 

Description: 

Subroutine SELDOT has exactly the same function as subroutine 
DOTSEL. 

B . ROFF ( RNUM # ROFND ) 


Parameter 

Dimension Type 

In/Out 

Description 

RNUM 

R 

In 

Real number to be 
rounded off 

ROFNO 

R 

Out 

The rounded off real 
number 


Description: 

Subroutine ROFF can round off a real number to one significant 
decimal place. 


MTE 


TXNB 


CLA88ZFZBD CATBGORY PBRCENTA6B8 
(OMCORRBCYBD) 


ACQOISITIOH DATE (8) 

CLA88IPICATI0M CBAMNBL8 

PIXEL PIXEL8 IN % OP PIXELS 

CATEGORIES CATEGORY IN CATEGORY 

Cj^(H) 

Cj(8) 

CjCN) 

• • • 

C^(-) 

X 

DO 

DO 

THRESHOLD 

X ♦ DO ♦ 

THRESHOLD 


Figure 3-25.- Classified Category Percentages 
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Figure 3-26.— Bias Correction Alpha Table. 
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Figure 3-27.— Corrected Proportions and Variances. 


tot«r Bias Corrsetion 
MODULE 
BIA8CB 


Znelttds CAMSCOMON INC 
Inltializs Arrays 


Call ELAPSE 
slapsed tims 


Compute uncorrscted 
proportions for each 
category. For all 
categories except 
category X use the 
formula t 

CATPCT % C^ « pixels classified into C^ | CATKNT 
. NPIX*NLIN into - DN - T - X 

% X • « pixels classified into X | CATKNT 
NPIX*NLIN 


DOPCT > (# pixels in DO) /NPIX*NLIN 
DUPCT - (« pixels in DU) /NPIX*NLIM 
TPCT - (« pixels thresholded) /NPIX*MLIN 
UPCT « (DUPCT + TPCT + % X) 


Figure 3-28.- Bias Correction/Classification Flow Chart 
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3.S.2.9.3 Cluster Raport8 (CmyT) (Pr^rainm^ and documenf d 
by L. F. Robinson and E» L. Wilson) 

This program is designed to provide the following report (s) upon 
request t 

e Brief Cluster 

e Cluster Nean/Standard Deviation 
e Intercluster Distance 
e Cluster Nearest Neighbor 

3. 5. 2. 9. 3.1 Linkages 

BRPCLO *CLOS^ CLUSNN **ELAPSE *FRONT *IDATE INCLDS,*INTPF MENSTD 
*OPEN$ *OUTPUT *SETEF *TIME 

*IMAGE 100 *IMALIB) LIBRARY system routines. 

♦*CAMS HYBRID SYSTEM UTILITY ROUTINES. 


3. 5. 2. 9. 3. 2 Interfaces 


A. CAMS Common Pareuneters 


Parameter 


set by 


Referenced by 


MAXACC 


INIT BRFCLU, CLUSNN, 

INCLDS, MENSTD 


COM 1 


Parameter 


Set by 


Referenced by 


NOSUB 


BRFCLU, CLUSNN, 
INCLDS, MENSTD 


•I 


II 


t 








ACDATE 

CHNVEC 

SUBCAT 


II 


II 


COM2 


i; 

I 


1 


Parameter Set by 

ISEG 

CATNAM 

NOCAT 

B. External File 

1. 'DBO: [300,11CLUSTATS.TMP‘ 

2. 'DBP: [300,1]6LOBAL.TMP;1* 


Referenced by 

BRFCLU, CLUSMN, 
INCLDS, MBNSTD 

H M 

II It 


3. 5. 2. 9. 3. 3 Inputs 

User inputs to this program determine which of the cluster reports 
are to be displayed and upon what device, Terminal Screen, Line 
Printer or the Gould Printer. (See JSC-IMA6E'>100 User's Manual, 
Part III CAMS Section 12.4) 


3 . 5 . 2 . 9 . 3 . 4 Outputs 

A. The outputs of this program consist solely of the following 

cluster reports: 1. Brief Cluster 2. Cluster Mean/Standard 

Deviation 3. Intercluster Distance 4. Cluster Nearest Neighbor. 
These reports may be routed to any of three display devices, the 
terminal CRT, line printer or the gould printer. 

B. Diagnostics 

1. "NO CLUSTER DATA AVAILABLE FOR SEGMENT " 

(progreun then exits) 

2. Other diagnostics consist of a message being repeated if the 
reply to it is considered invalide. 

3 . 5 . 2 . 9 . 3 . 5 Storage Requirements 
CLURPT occupies 72 blocks. 
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3.5.2.9.3.6 Description 

CLURPT clears the terminal screen* displays date/time* and checks 
to see if there is cluster data available for the segment being 
worked. Zf not* the diagnostic (3. 5. 2. 9. 3. 4 BI) is displayed 
a ftd the program exist* If data are available* the user is asked 
%dkich report is desired and what device is to be used. Upon 
receiving valid replys to these guerries* the subroutine respon- 
sible for generating the requested report is called. When the 
subroutine in question returns, a check is made to see if further 
reports are required} if not* the program exists. If other 
reports are desired* the subroutines necessary are called in 
order and then the program exists. 

3. 5. 2. 9. 3.7 Flowchart 
Presented in figure 3-29. 

3. 5. 2. 9. 3. 8 Subroutines 
3. 5. 2. 9. 3. 8.1 MENSTD 

This subroutine produces the Mean/Standard Deviation cluster 
report . 

• Calling sequence 


CALL MENSTD (DOl* D02 

* D03) 



e Arguments 




Parameter Dimension 

Type 

In/Out 

Description 

DOl 1 

Integer 

In 

Display device 

D02 1 

Integer 

In 

Display device 

D03 1 

Integer 

In 

Display device 


e Description 

MENSTD displays upon the output device specified the Mean/Standard 
Deviation cluster report* for the segment being worked on* from 
data contained in the file CLUSTATS . TMP . 


If the terminal Is the display device the report will be broken 
up into pages such that no data will be lost due to screen over- 
load. After each page is full the message "ENTER *CR" TO PROCEED" 
is displayed and processing is halted until a "CR" is input. 


3. 5. 2. 9. 3. 8. 2 INCLDS 


This subroutine produces the Intercluster Distance cluster report. 
• Calling sequence 

CALL INCLDS (DOl, D02, D03) 


e Arguments 


Parameter Dimension 


DOl 

D02 

D03 


1 

1 

1 


Type 

Integer 

Integer 

Integer 


In/Out Description 

In Display device 
In Display device 
In Display device 


e Description 

INCLDS displays upon the output device specified the Intercluster 
Distance cluster report, for the segment being worked on, from 
the data in the file CLUSTATS.TMP. 


If the terminal is the display device the report will be broken 
up into pages such that no data will be lost due to screen over- 
load. After each page is full the message "ENTER "CR" TO 
PROCEED" is displayed and processing is halted until a "CR" is 
input. 

3. 5. 2. 9. 3. 8. 3 BRFCLU 

This subroutine produces the Brief Cluster cluster report, 
e Calling sequence 

CALL BRFCLU (DOl, D02, 003) 








• Arguments 


Parameter 

Dimension 

Type 

In/Out 

Description 

DOl 

1 

Integer 

In 

Display device 

D02 

1 

Integer 

In 

Display device 

D03 

1 

Integer 

In 

Display device 


e Description 

BRPCLU displays upon the output device specified the Brief Cluster 
i cluster report, for the segment being worked on, from data con- 

tained in the file CLUSTATS.TMP. 

If the terminal is the display device the report will be broken 
up into pages such that no data will be lost due to screen 
overload. After each page is full the message "ENTER “CR" TO 
PROCEED" is displayed and processing is halted until a "CR" is 
input. 

3.5.2. 9. 3. 8. 4 CLUSNN 

This subroutine produces the Cluster Nearest Neighbor cluster 
report . 

• Calling sequence 

CALL CLUSNN (DOl, C02, D03) 

• Arguments 

Parameter D imension Type In/Out Description 

DOl 1 Integer In Display device 

i • D02 1 Integer In Display device 

D03 1 Integer In Display device 

s Description 

CLUSNN displays upon the output device specified the Cluster 
Nearest Neighbor cluster report, for the S'^igment being worked on, 
from data contained in the file CLUSTATS.TMP. 

1 r 



If the terminal is the display device the report will be broken 
up into pages such that no data will be lost due to screen over- 
load. After each page is full the message **ENTER **CR" TO PROCEED" 
is displayed and processing is halted until a "CR" is input. 
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Figure 3-29.— Brief Cluster Report. 
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Figure 3-30.- Cluster Mean/Standard Deviation Report. 
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Figure 3-31.- Intercluster Distance Report. 
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Figure 3-33 
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Figure 3-34,— Cluster Reports. 







3. 5 *2. 9. 4 Fisld Dttfinition Report (PLDRPT) 

PLDRPT - Field definition report - this routine will generate 
an output report containing all data in the FIELDS. TMP file. 

The report can be output on any of the following} line printer » 

Gould printer or terminal. 

3. 5. 2. 9. 4.1 Linkages 

A. ASSIGN, CLOS$, ELAPSE, IBYTE, OPENS, OUTPUT, SETEF 

B. ? 

C. G86DPH 

D. N/A 

E. N/A 

3. 5. 2. 9. 4. 2 Interfaces 

A. N/A 

B. N/A 

C. Working files - [300,1] FIELDS. TMP - input only 

3. 5. 2. 9. 4. 3 Inputs 

A. N/A 

B. N/A 

C. KEY-IN - T for terminal, G for Gould, or L for line printer 
to direct report to proper device. 

D. N/A 

3 . 5 . 2 . 9 . 4 . 4 Outputs | 

A. Reports - Field Definition Report - Reference?? 

B. ? 

c. ? 

! 

i 

i 

i 

I 

j 


j 


3. 5. 2. 9. 4. 5 Storage requironent 
FLDRPT occupies 35 blocks. 

3. 5. 2. 9. 4. 6 Description: 

The routine queries the terminal for which device (Gould Printer, 
line printer or line printer) to output the report on. Next it 
opens the FIELDS. TMP file and using the data in the first records 
sets up a DO- loop to handle all the data. A heading is 
printed to the output device; the data is read, formatted and 
output to the appropriate device. When the bottom of the page 
for the line printer and Gould printer is reached, a new header 
is printed and additional data output until all data is processed. 
Then an "END of report" is output to the terminal followed by 
"Restart or EXIT?" which is self explanatory. For the terminal 
output when the bottom of the page is reached, the message "ENTER 
F for page forward, R for Restart or X for exit" is output. 

If "F" is input, a new header is output and output continues to 
line bottom of the page or end of data as above. Otheirwise the 
routine exits or restarts. 
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Figure 3-34a.— Field Data Report 
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Figure 3-34a.- Continued 












3.5.2.10 PTmanent Data Bay O^ato (PRMOPD) (Programmed and 
bocumeniad By l^. Paitlson) 

This program transfers the specified set of files currently 
residing in the temporary file area on the System Disk (DBO) to 
the Permanent Data Base Disk (DB2) . If updates have been made 
to the Dot Data File and/or the Fields File the files are 
offloaded in card format; if not the option is provided to 
force an offload. The acquisition delete flag is set at either 
the user's discretion or by system requir^ent. 

3.5.2.10.1 Linkage 


.' 4 . IMALIB 

B. FORTRAN 

C . Shared Subroutines 


1 . 

ELAPSE 

Private Subroutines 

1 . 

SUBSTR 

2 . 

UNLDOT 

3. 

AQLFST 

4. 

CLASAV 

5. 

DOTSAV 

6 . 

FLDSAV 

7. 

JULIAN 

8 . 

RPT 6 EN 

9. 

STASAV 

10 . 

FLDOFF 

11 . 

ROFLD 




1 



A 

f 






3.5.2.10.2 Interfacer. 
A. COMl 


Parameter 


Updated by 
Subroutine 




Referenced by 
Subroutine 


' 1 





COM2 

Updated by 

Referenced by 

Parameter 

Subroutine 

Subroutine 

DELFL6 

AQLPST 

AOLFST 

MOACQ 


AQLFST 

ABATES 


AQLFST 

DOTDAY . 

DOTSAV 

RPTGEN 

NSTART 

DOTSAV 

DOTSAV 

FLDDAY 

FLDSAV 

RPTGEN 

IMDATE 

CLASAV 

STASAV 

RPTGEN 

NSTART 



PDATEL 

CLASAV 

RPTGEN 

RPTGEN 

TDATEl 


CLASAV 

PDAIE2 

CLASAV 

RPTGEN 

RPTGEN 

TDATE2 


CLASAV 

PDATE3 

STASAV 

RPTGEN 

RPTGEN 

TDATE3 


STASAV 

NOCAT 


STASAV 

COM3 

Updated by 

Referenced by 

Parameter 

Subroutine 

Subroutine 

PFLAG 


RPTGEN 

CLASAV 

MAIN 

STASAV 

EFLAGl 


MAIN 

EFLAG2 


MAIN 

EFLAG3 


MAIN 

EFLAG5 


MAIN 

UFLAGl 


CLASAV 

MAIN 

RPTGEN 

UFLAG2 

MAIN 

RPTGEN 

UFLAG3 

MAIN 

MAIN 

RPTGEN 






. 


. 1 . 


<1 


Updated by Referenced by 

Parameter Subroutine Subroutine 

UFXAG4 STASAV 

MAIN 

RPTGSN 


D. C0M5 

Parameter 

TYPE 

DLABEL 


Updated by 
Subroutine 


E. Working File Name(s) 

1. DIRFILE.DAT 

2. DOTS.TMP 

3. XXXXDOOTS.DAT 

4. FIELDS. TMP 

5. XXXXFIELD.DAT 

6. CLASSMAP.TMP 

7. XXXXPCLAS.MAP 

8. XXXXTCLAS.MAP 

9. CLUSTERMP.TMP 

10. XXXXTCLUS.MAP 

11. XXXXPCLUS.MAP 

12. CLUSTATS.TMP 

13. XXXXPSTAT.DAT 

14. XXXXTSTAT.DAT 

15. DSKTBL.DAT 


Referenced by 
Subroutine 

DOTSAV 

DOTSAV 


3.5.2.10.3 Inputs 

Key-In (reference User's Manual or other attachment to this 
package . ) 


3*5.2.10.4 Outputs 

A. Reports-Penr.anent Data Base Update Transaction Report 
(Reference User's Manual for details.) 
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B. Diagnostics (Should be in User's Manual - redundant here.) 

3.5.2.10.5 Storage Requirements 
PRMUPD uses 83 blocks. 

3.5.2.10.6 Description 

The Permanent Data Base Update program uses a single file format 
to establish file names, making minimal character changes as file 
names change. The specific files are transferred in the following 
manner : 

e Dot Data File: 

e If there have been updates to this file the transfer 
is made and an offload is forced. 

• If there have been no updates the analyst may force an 
offload. 

• Fields File 

• If a Fields File does not exist, this processing area is 
bypassed. 

• If there have been updates to this file the transfer is 
made and an offload is forced. 

• If there have been no updates the analyst may force an 
offload. 

• Classification and cluster maps 

e If either of these files do not exist this area is 
bypassed. 

e If at initialization time permanent files were requested 
and during processing they have been modified, the updated 
files are saved. 

• If temporary files were requested they are saved as 
permanent files irregardless of whether they were 
modified or not. 

• Statistics File 

e If a statistics file does not exist, this processing area 


6 



is bypassed. 4 

• If at Initialization time permanent files were requested j 

and during processing the statistics file was modified, I 

I 

the updated file is saved. | 

• If temporary files were requested the statistics file | 

is saved as a permanent file irregardless of whether it | 

was modified or not. f 

j 

When all files have transferred successfully the analyst is given 
the opportunity to set the delete flag if the number of acquisitions 
for this segment exceeds three. 

3.5.2.10.7 Flow Chart 

Flow chart is presented in Figure 3-35. 

3.5.2.10.8 Subroutines 
3.5.2.10.8.1 SUBSTR 

TO move a substring of A into a substring of B 

e Calling sequence 

CALL SUBSTR (A.I ,N,B, J,M) 

• Arguments 


Parameter 

Dimension 

Type 

In/Out 

Description 

A 

A(l) 


In 

String neune containing 
data to be moved 

I 


1x2 

In 

Starting position 

N 


1x2 

In 

Length 

B 

B(l) 


Out 

Receiving string name 

J 


1x2 

Out 

Starting Position 

M 


1x2 

Out 

Length 


e Description 

The contents of string name 'A' starting at for *N* 
characters is moved to string name 'B' starting at '0* for 

^7f 




9 


'M' characters. If string *B' Is shorter than string 'A* 
characters on the right will be truncated. If string *B* 
is longer, it will be blank filled on the right. 


3.5.2.10.8.2 

To reformat file DOTS.TMP on the System Disk (DBO) into 80 
column card images for subsequent processing by system subroutine 
CARD-OUT card eventual card punching in the PMIS DAS. 

e Calling sequence 
CALL UNLDOT 

e Arguments are passed thru Global Common 
e Description 

The 'SEGMENT', 'TYPE*, and 'START' cards are formulated and 
written to file 'CARD.DAT' (which will subsequently be 
processed for off line card punching) . The individual 
'DOT' card formats are built with the associated labels and 
the card Images written to the output file. 

3.5.2.10.8.3 AQLFST 

To set the acquisition delete flag upon either the analyst request 
or when forced to by the system. 

e Calling sequence 
CALL AQLFST 

e Arguments are passed thru Global Common 
e Description 

If the acquisition delete flag is already set or the number 
of acquisitions for the segment is thru or less an immediate 
exit is effected. If the number of acquisitions is four or 
five the analyst is given a choice of setting the flag or 
delaying his decision. When the number of acquisitions 
reaches six and the flag is not set, the analyst is forced 
to set the flag. The only other alternative is to abort the 




run. Hh«n setting the delete flag the analyst is shown which 
acquisition dates are eligible for deletion. 

3.5.2.10.8.4 CXASAV 

To transfer the classification and cluster maps residing in the 
temporary file on the system disk to the permanent Data Base 
Disk properly Identified. 

• Calling sequence 
CALL CLASAV 

• Argximents are passed thru Global Common 
s Description 

The cluster map is transferred first. If tenq>orary files 
were originally loaded the permanent date in the Directory 
File is set from the ERIPS date. The classification map is 
transferred next. If temporary files were originally loaded 
the permanent date in the Directory File is set from the 
ERIPS date. The Julian date for the last I-lOO work on this 
segment is set into the Directory File. 

3.5.2.10.8.5 DOTSAV 

To transfer the Dot Data File residing in the temporary file 
on the system disk to the permanent data base file properly 
identified. 

s Calling sequence 
CALL DOTSAV 

s Arguments are passed thru Global Common 
s Description 

The Dot Data File is transferred from the temporary file on 
the system disk to the permanent data base disk. The update 
Julian date is saved in the Directory File. The analyst is 
given the option of forcing a starting value vector different 
from the one displayed. The offload (UNLDOT) program is 
called to perform its assigned tasks. (See 3.5.2.10.2.) 

SS’J 




3.5.2.10.8.6 PLOSAV 

To transfer the FIELDS Pile residing in the temporary file on 

the system disk to the permanent data base file properly identified. 

e Calling sequence 
CALL PLOSAV 

e Arguments are passed thru Global C<»mnon 
e Description 

The FIELDS File is transferred from the temporary file on 
the system disk to the permanent data base disk. The update 
Julian date is saved in the Directory Pile. The offload 
(FLDOFF) program is call to perform its assigned tasks. 

(See 3.5.2.10.10.) 

3.5.2.10.8.7 JULIAN 

To convert the current year, month, day, values to a Julian 
date. 

e Calling sequence 

CALL JULIAN (YR. MO, DY, JULIO) 
e Arguments 


Parameter 

Dimension Type 

In/Out 

Description 

YR 

1x2 

In 

Current year (ASCH 
format) 

MO 

1x2 

In 

Current month (ASCH 
format) 

DAY 

1x2 

In 

Current Day (ASCH 
format) 

JULIO 

1x2 

Out 

Converted Julian date 


e Description 

A preset table of Julian date values is accessed and the 
retrieval value is added to the current day. If the current 
year is a leap year the necessary Julian date adjustment is 
made. 




3.5.2.10.8.8 RPT6BM 
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To output the Permanent Data Base Update Transaction Report 
e Calling sequence 


CALL RPTGEM 

(8BGNO, I, 

K, 

PILTYP, A) 


Arguments 

Parameter 

Dimension 

TJCfie 

In/Out 

Description 

8E6N0 

(2) 


In 

8egment number being 
processed 

I 


1x2 

In 

Current month 

J 


1x2 

In 

Current day 

K 


1x2 

In 

Current year 

PILTYP 

(23) 


In 

Name of file going to 
Data Base 

A 

(f) 


In 

Current time 


e Description 

The transaction report header information (titles, date, 
time, segment number and disk nuniber) are output to the 
Gould printer. Based on the existence of, the update status, 
and the status of Intlalized files (temporary or permanent) 
the files that were actually transferred to the permanent 
data base are listed with their associated Julian date. 

3.5.2.10.8.9 8TA8AV 

To transfer the segmented statistics file residing in Common 
Block #1 and in the temporary file on the system disk to the 
permanent data base file properly identified. 

e Calling sequence 
CALL 8TASAV 

• Arguments are passed thru Global Common 
e Description 

Common Block #1, which contains the statistical Information 
in the header record for this segment, is written to the 
permanent data base disk. The additional statistics file 
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data is transferred from the tenqporary file dn the system 
disk to the permanent data base disk. The updated Julian 
date is saved in the Directory File. If temporary files 
were loaded at initialisation time the permanent date in 
the Directory Pile is set from the EkIFS date. 

3.5.2.10.8.10 FLDOFF 

To reformat file DOTS.TMP on the System Disk (DBO) into 80 
column cards, processable by the ERIPS system, for subsequent 
input to system subroutine CARD*ODT and eventual card punching 
by the PMIS DAS. 

e Calling sequence 
CALL FLDOFF 

e Arguments are passed thru Global Common 
e Description 

The header cards are formulated and written to the output 
file being constructed for CARD-OUT (XXXXFLDOF.DAT). The 
individual field card (LINENO and PIXELNO) card formats are 
built with the associated vertice number and the card images 
written to the output file. Every pair of vertices is 
checked to determine if it is also a specified 'DOT* and if 
so the type of field ('DO* or 'DU') is indicated in the Dot 
Data File. 






Figure 3»35.— Permanent Data Base Update. 
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APPENDIX A 
CODING STANDARDS 

• All coding will be done in FORTAN IV and con^lled with the 
F4P compiler. (Exceptions may be granted if asseitibly language 
wil'. make a considerable time difference.) 

e Upon entry, each program will perform the following functions: 

1. Interactive programs will clear the Tektronic screen - 
CALL OUTPUT (27,12). 

2. Print the program name and version/date. See Example 3. 

3. Print the current date and time. See Exas^le 3. 

4. Initiate timing. 

e Each program should have a comment header giving the name of 
the program or subroutine and its primary function. 

Example: 

CCC 

c 

C IMAGE DATA DISPLAY - IMDIS.FTN (MAIN) 

C 

CCC 

or 

SUBROUTINE RIMDA 
C 

CCC 

C 

C 

c 

c 

c 


e Comments should be present for every local major function, 
e Queries: (See examples 1 and 2) 

1. Brief and meaningful. 

2. Print default condition and allow answer on same line. 

Use as carriage control in the format statement to keep 
the cursor on the s£une line. 





i 

I 


f 

1 


ooooooo ooooo 






)• CR ' ' aee«pt default (if no default# repeat query) • 

4. *8* back-up to last query (not allowed on 1st query or at 

program exit logic) • 

S* 'X* branch to program exit logic. 

6. Read responses with alphanumeric fojnnat and use IMALXB 
routines 'FRONT*# 'XNTFF*# etc. to interpret answers. See 
examples 1 and 2. 

7. Test on alphanumeric characters rather than octal numbers 
(i.e.# *Y'# *N*# *B* rather than *130, *120). 

8. Xf iiq>ut is unacceptable# print error message and return to 
print query again. 

R. ^e symbol *>* will be used to indicate to the analyst an 
input is expected. The default# if any# should be printed 
immediately preceding the *>* symbol. 

10. Xn the case where *B* and 'X* are acceptable responses to a 
query# the printed message should include: ' (Back-up and 

Exit Options Not Allowed) * . 

e Exit logic at the end of an X-100 interactive program should 
print the elapsed time# then ask *E(X)XT or (R)ESTART. Xf 'R* 
response# return to the logical start of the program. Xf 'X* 
response# save global common and set event flag 50. (INCLUDE 
*C300#3]CAMSSAV') . 

e All interactive programs will include the global common blocks 
via the statement INCLUDE * [300# 3]CAMSCOMON* . Offline programs 
will include if needed. 

• Interactively# passage of data from one module to another will 
be accomplished by the GLOBAL common blocks and working data 
files. All files are defined in section 3.4. 

• There are no restrictions on common blocks within the individual 
modules# however they must be defined in the design document. 






rmngM library routinas amst ba utilisad* Thaaa utili^.aa Inaluda 
reutiaas for iatarprating usar input* aagnatio tapo utilitiaa 
and aaay othars. A list has baan providad to aa<di taam nonber. 

Xt is aaeh team nenbars rasponsibility to f andliariza binsalf 
with thasa utilities* 






BYTE FXIBMI (32) « «(74) 

10 NRZTB (6,1000) PXIMMC 
1000 FOBNBT(*$ PILB NANBt*, 32A1, 2X, *>*) 

C* RING BELL 

CELL OOTPOT (7) 

BEAD (6,1010) It 
1010 FORMAT (74A1) 

C* REMOVE LEADING BLANKS 

CALL FRONT (W,74) 

IF (W(1).EQ.*X*) GO TO exit logic 

XF (W(l) .BQ. *B*) GO TO previous query ( net statement 10) 
XF (W(l).EQ. * *) GO TO accept default 
DO 20 I • 1,30 
20 FILNAM(I) - N(I) 

GO TO 10 


TeKtronix printout from the above would look like the following: 

FILE NAME: DKl: [100, 2]S18176032 > MTO: [I70,1]IMAGE.DAT 

FILE NAME: HTOx[l70,l]lMAGE.DAT > C/R to accept 




EXAMPLE 2 


BYTE N(74) 

INTEGER CHNVBC(4) 

10 WRITE (6,100) CHNVEC 

100 PORMATCO CBAMNELSS 413 *?>*) 

CALL OUTPUT (7) 

* READ(6,10i)W 

101 FORMAT (74A1) 
wiLL FRONT (W, 74) 

XF(W(1).EQ. *X*) GO TO exit logic 

XF(W(1) .EQ. *B') GO TO previous query ( not statement 10) 
2F(W(1).EQ. • *) GO TO accept default 
C* Decode input string 
IP • 0 

00 20 I « 1,4 

CALL XNTFFdP, W, 74, CBNVEC(I)) 

20 CONTINUE 

perform error checking if applicable and return to 10 if 
an error is detected. 



E3AMPLB 3t HEADING PRINT 


DATE: MM/DD/IY 

TIMBt HRtNMtSS 


IMAGE DISPXAY PROGRAM/MAY 1977 
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APPENDIX A 


DEVELOPMENT STANDARDS 

• All coding will be done in FORTRAN 4 and complied with the 
F4P compiler. (Exceptions may be granted if assembly language 
will make a considerable time difference.) 

e Upon entry, each program will 

1. Clear the Tektronic screen - CALL OUTPUT (27,12) . Inter- 
active programs only.) 

2. Print the program name and version/date. 

3. Print the current date and time. 

4. Initiate timing. 

e Each program should have a comment header giving the name of 
the program or subroutine, its primary function and name of 
programmer. 

e Comments should be present for every local major function, 
e Queries 

1. Brief and meaningful, with all acceptable responses indi- 
cated in parenthesis if possible. 

2. Print default condition and allow answer on same line. 

The symbol *>' will be used to prompt the user for input. 
(See example 1) 

3. C/R ' ’ accept default (if no default, repeat query). 
Default conditions should be printed immediately proceeding 
the input promp\. ' > ' . 

4. 'B' back-up to last query. 

5. 'X* branch to program exit logic. 




6. Read rasponsas with Alphanumario fraa form format and 
uaa ZMALZB rotttinaa 'FRONT*, 'ZNTBP*# eto. to iatarprat 
anawara. Blanks and/or oMtnas should ba usad as da* 
limitars. 

7. Tast on alphanumarlc charaotars rathar than octal numbars 
(i.a., *Y', *N', 'B* rathar than *130, *120). 

8. In ordar to provida *6* (backup option), logic batwaen 
two queries should be coiqpatibla. 

a At the and of an I-lOO interactive program, ask *E(X)IT or 
(R)BSTART, i.e., *R* to return to the logical start of the 
program, *X* to return to control program. Before exit, 
print elapsed time and save the GLOBAL common area on disk 
file GLOBAL. TMP. 

a Global common areas will reside in memory at all times. 

a Passage of data from one module to another will be accomplished 
by the GLOBAL common area and working data files. 

a There will be no restrictions on common blocks within the in* 
dividual modules, however they must be defined in the design 
document. 



EXAMPLE 1 


BYTE FZLtlAM (32), 1t(74) 

10 WRITE (6,1000) PILNAM 

1000 FORMAT ('$ FILE NANEt', 32A1, 2X, *>') 

CALL OUTPUT (7) 

READ (6,1010) W 
1010 FORMAT (74A1) 

CALL FRONT (W,74) 

IF (W(l).EQ. *W') GO TO exit logic 

IF (W(l) .EQ. *B') GO TO previous query ( not statement 10) 
IF (W(l).BQ. ' ') GO TO accept default 
DO 20 I • 1,20 
20 FILMAM(Z) • W(I) 


Tektronix printout from the above would look something like the 
below: 

FILE NAME: DKl: [100,2] 518176032 > MTO: [170,1] IMAGE. DAT 

FILE NAME: MTOt [170,1] IMAGE. DAT > C/R to accept 









APPENDIX B 
GLOSSARY 

Th« following definitions and identifications refer only to LACXB 
and CAMS Procedure 1. For more c«nprehensive definitions see the 
"First LACXE Dictionary of Remote Sensing Terminology JSC-11332, 
or other general works on remote sensing. 

Acquisition - The portion of a Landsat scene which represents a 
LACXE segment at a specific point in time. 

Alarm - A bit image which is used for transient storage of results 
of operations on images. Alarms are displayed by pushbutton on 
the Xmage-100. (See Theme) 

Automatic Labelling - This is a procedure for determining the most 
probable Identity of a cluster according to the label of the 
nearest labelled dots. 

CSX - Cataloging and indexing. 

CAMS - Classification and Mensuration Subsystem of LACXE. 

CAMS/CAS Interface Tape - A digital computer tape primarily used 
to transmit information from CAMS to CAS. 

CAS - Crop Assessment Subsystem of LACXB. 

Category - In essence, a name to be used for identifying clusters 
and classes. 

CXR - Color infrared image. 

Class - Normally the groupings of clusters that are known to 
belong to given categories, such as wheat, non-wheat, and spring 
wheat. 

Classification Map - The Universal Tormat classified image, found 
on the DTRM tape, in which all pixels are assigned to one or 
another category . 





CIttitar - A gro\qp of pixala that ara similar in spactral values, 
as ganaratad by automatie (non-suparvisad) classification programs. 

Cluster Hap - A Universal Format image, to be found on the DT8M 
tape, idiioh reflects (spatially) how pixels were assigned to the 
generated clusters. 

Control Program - The basic subunit of the CAMS Image-100 Hybrid 
System which calls all other interactive programs in the system; 
implicitly or explicitly, an analyst returns to this program when- 
ever he exits other programs. 

CRT - Cathode ray tube, a color television tube used for display 
of images on the Image-100. 

PEC - Digital Equipment Corporation. 

DO - "Designated other" pixels; usually those areas in the scene 
known not to be the category of interest (rivers, cities, etc.). 

DO/DD Cards - A deck of punched cards which list vertices of 
fields containing all DO and DU pixels. 

Pot - A pixel selected in some systematic way for use in Procedure 
1 classification or clustering schemes. 

DTRM Tapes - (sometimes written DTERM) - digital computer tapes 
primarily used to transmit imagery data from ERIPS to the Pro- 
duction Film Converter, Building 30, for preparation of photo- 
graphic images. 

DU - "Designated unidentifiable" pixels; those pixels vdiich are 
to be excluded from proportion calculations; usually clouds and 
cloud shadows. 

EOD - Earth Observations Division of NASA at the Johnson Space 
Center. 

ERIPS - Earth Resources Interactive Processing System, the 
primary analysis system for LACIE, implemented on an IBM-360 
computer system. 


ERTS Format - A raw-data tape format used for Landsat-l and -2 
imagery data. 

Global Common - A portion of computer memory reserved for common 
use by all subunits of the CAMS Image-100 Hybrid System. 

Gould Printer - A user-oriented immediate access printer physically 
located adjacent to the Image-100 console. 

GSFC - Goddard Space Flight Center, NASA, Greenbelt, Maryland. 

Hybrid - In the CAMS Image-100 Hybrid System this term refers to 
a means of performing certain operations on BRIPS to save time. 

Image-100 - The General Electric Interactive Multispectral Analysis 
system. Model 100, which incorporates a PDP 11/45 computer. 

I-lOO - See Image-100. 

ISOCLS - Interactive Self-Organizing Clustering Program, a non- 
supervised classification program. 

IR - Infrared. 

JSC - Lyndon B. Johnson Space Center, Houston, Texas. 

Kauth Transformation - A mathematical transformation used to 
reduce the four highly-redundant Landsat channels to two very 
independent channels, called "greenness" and "brightness," and 
two others which carry little information. 

LACIE - Large Area Crop Inventory Experiment. Also used as an 
acronym (with a version number) to identify the primary computer 
system for processing imagery data. The LACIE computer system 
includes ERIPS as well as the batch processing functions on the 
IBM computers in Bldg. 30, JSC. 

LARSYS - Laboratory for the Application of Remote Sensing System, 
referring to programs somehow related to the remote sensing 
organization in Purdue University. The term is locally used to 
refer to the EOD-LARSYS program for processing of remotely sensed 
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imagery data# which now bears little resemblance to the original 
progrwns* 

lARSYS Format - A digital computer tape format for imagery « based 
on interleaved channels. 

LPDL - The LACIE Physical Data Laboratory in Building 17. 

MAG Tape - Digital computer tape. 

Multitemporal Analysis - Operations in which several acquisitions 
are analyzed as a single multi-chemnel image to inq>rove precision 
of calculation; called multitemporal because the acquisitions are 
images of the same scene taken at different times. 

PFC - Production Film Generator in Building 30. 

Procedure 1 A procedure for performing the classification and 
mensuration function of LACIE. 

RP04 - Trade name for the disk drives used in the current hardware 
configuration for the PDP 11/45. 

RSX-llD - Multiprogramming operating system for the PDP 11/45 
computer. 

Scatter Plot - A graph of the location of pixels in spectral 
coordinates, which may be raw spectral data or Kauth data. 

Segment - A fixed geographical area which is analyzed in the 
LACIE project. Segments are identified by numbers. Individual 
acquisitions of each segment are analyzed as they become available. 

Spatial Coordinates - Coordinates in space, such as line number 
and pixel number. 

Spectral Coordinates - Coordinates in terms of spectral intensity, 
such as numbers for each of the four Landsat-2 channels. 

TBD > 'To Be Determined.' 

Tektronix - The brand name of the interactive terminal with 
graphics screen associated with a printer for the contents of 
the same screen, both physically associated with the Image-100. 
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Theree - A bit image used for semipermanent storage of results of 
operations on images themes; can be displayed by pushbutton on 
the screen of the Image-100. (See Alarm) 

Trajectory Plot - A graph showing the location in spectral coord- 
inates of a dot (or other pixel) as a function of time. 

Universal Format - An interleaved-pixv?! format for images which 
is specified for use in the LACIE program (see LACIE Level III 
baseline document number 00701) . 

Vector - As used in this document » the set of spectral values 
associated with a pixel. For a single (four-channel) acquisition 
there will be as many as four such values. For a four-acquisition 
multitemporal image there could be as many as sixteen values 
associated with each pixel. 

window - An area in the refresh memory and on the screen that is 
used for display purposes. 

Zoom - Magnify by repeating pixels. 
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INDEX TO ALL VOLUMES 


The following index lists all computer programs and subroutines 
found in the text and printouts, and the variables listed in the 
text. The first number of each description is the volume number, 
and the remaining number refers to the section in that volume. 

A preceding L indicates the position of a listing. Therefore, 
1-3. 3.1 indicates a reference in section 3.3.1 of volume 1, and 
L2-14.6 indicates that a listing can be found in section 14.6 
of volume 2. The list of programs and subroutines is definitive. 
The list of variables is not ccxnplete since those not mentioned 
in text are not included. 
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